Kindly help on the Userform Textbox code

[SPLUCENA]

Hi,

Need help on the below code, it is giving me a runtime error 424, how should this code be fixed?

Private Sub CommandButton1_Click()
If Target.Column = 3 Then
    
    Target.Offset(0, 31) = UserForm1.TextBox1.Value
    Target.Offset(0, 32).Value = UserForm1.TextBox2.Value
    Target.Offset(0, 33).Value = UserForm1.TextBox3.Value
    Target.Offset(0, 35).Value = UserForm1.TextBox4.Value
End If
UserForm1.Hide
End Sub

Thanks for the help!
splucena

 

[baitmaster]

you haven't defined what Target is. You might use selection, activecell, or a defined range of some sort

 

[SPLUCENA]

Anyone? please..