Hallo!
Ich komme mit einem Problem nicht weiter und würde mich sehr über kompetente Hilfe freuen.
Ich habe folgenden Code:
Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyReturn Then
Cells(Range("A65536").End(xlUp).Offset(1, 0).Row, 1) = TextBox1
End If
End Sub
Bewirkt das der Inhalt aus einer Tetxtbox jeweils beim drücken der Enter Taste in die nächste Zeile der Spalte A eingegeben wird.
Nun hätte ich das gerne genau anderherum und ohne Enter Taste. Sprich: Ich möchte, dass bei klicken des CommandButtons jeweils der nächste Eintrag in einer Textbox auf meiner Userform eingetragen wird. Also erst B1 dann B2 dann B3 usw.
Hat da jemand nen Code für mich?
|