Private Sub testbtn_Click() Me.cert_sum = 300 End Sub
http://www.sql.ru/forum/1074703/ne-menyaetsya-znachenie-polya-iz-vba