G
Guest
Hello!
I would like to clear the content of single textboxes of my userform.
To clear all content I use a commandbutton which works fine. When I select a
specific textbox and press the delete key the textbox looks empty. Then I
click the button "save changes" using the code below but the change is not
saved to my table. When I change values the change will be saved to the table.
Private Sub cmd_save_Click ()
ActiveCell.Offset(0, 47) = CDbl(txt_fwdEUR)
ActiveCell.Offset(0, 48) = CDbl(txt_janEUR)
ActiveCell.Offset(0, 49) = CDbl(txt_febEUR)
ActiveCell.Offset(0, 50) = CDbl(txt_marEUR)
ActiveCell.Offset(0, 51) = CDbl(txt_aprEUR)
ActiveCell.Offset(0, 52) = CDbl(txt_mayEUR)
ActiveCell.Offset(0, 53) = CDbl(txt_junEUR)
ActiveCell.Offset(0, 54) = CDbl(txt_julEUR)
ActiveCell.Offset(0, 55) = CDbl(txt_augEUR)
ActiveCell.Offset(0, 56) = CDbl(txt_sepEUR)
ActiveCell.Offset(0, 57) = CDbl(txt_octEUR)
ActiveCell.Offset(0, 58) = CDbl(txt_novEUR)
ActiveCell.Offset(0, 59) = CDbl(txt_decEUR)
End Sub
How can I solve it?
Best regards,
Bodo Frost
I would like to clear the content of single textboxes of my userform.
To clear all content I use a commandbutton which works fine. When I select a
specific textbox and press the delete key the textbox looks empty. Then I
click the button "save changes" using the code below but the change is not
saved to my table. When I change values the change will be saved to the table.
Private Sub cmd_save_Click ()
ActiveCell.Offset(0, 47) = CDbl(txt_fwdEUR)
ActiveCell.Offset(0, 48) = CDbl(txt_janEUR)
ActiveCell.Offset(0, 49) = CDbl(txt_febEUR)
ActiveCell.Offset(0, 50) = CDbl(txt_marEUR)
ActiveCell.Offset(0, 51) = CDbl(txt_aprEUR)
ActiveCell.Offset(0, 52) = CDbl(txt_mayEUR)
ActiveCell.Offset(0, 53) = CDbl(txt_junEUR)
ActiveCell.Offset(0, 54) = CDbl(txt_julEUR)
ActiveCell.Offset(0, 55) = CDbl(txt_augEUR)
ActiveCell.Offset(0, 56) = CDbl(txt_sepEUR)
ActiveCell.Offset(0, 57) = CDbl(txt_octEUR)
ActiveCell.Offset(0, 58) = CDbl(txt_novEUR)
ActiveCell.Offset(0, 59) = CDbl(txt_decEUR)
End Sub
How can I solve it?
Best regards,
Bodo Frost