hey leute, habe folgende formel:
Private Sub CommandButton1_Click()
Set Frm = UserForm1
Sheets(„tabelle1“).Activate
Range(„A7“).End(xlUp).Offset(1, 0).Select
With Frm
ActiveCell.Value = .TextBox1.Value
End With
End Sub
Die formel soll eigentlich aus einer userform daten auf ein tabellenblatt einfügen. Allerdings scheitert es schon beim ausführen. Es kommt die o.g. fehlermeldung und sheets wird gelb markiert.