Hi
In a userform I have two textboxes. What I write in these two textboxes I want to put in two different cells. I have this code here. But there is something wrong. Please help me.
Code
Private Sub CommandButton1_Click()
Dim aarstal As Long
Dim dato As String
aarstal = TextBox1
dato = TextBox2
End Sub
Private Sub CommandButton2_Click()
Dim aarstal As Long
Dim dato As String
With Sheet1
.Cells(1, 1) = aarstal
.Cells(2, 1) = dato
End With
Application.ScreenUpdating = False
Unload Me
End Sub
Display More
Alring