Tabellenanfang
25.10.2012 17:18:45
Uwe
benötige Hilfe bei folgendem Code...
Private Sub CommandButton1_Click()
With Sheets("Textzeilen").Cells(65536, 1).End(xlUp)
.Offset(1, 0) = Me.ComboBox3
.Offset(1, 9) = Me.TextBox16
.Offset(1, 11) = Me.TextBox17
End With
End Sub
Für eure Hilfe danke ich schon mal im Vorab.
Gruß Uwe
Anzeige