Supportnet / Forum / Tabellenkalkulation
Wert von einer Text, Combobox in zelle einfügen
Frage
Hallo zusammen,
ich hab schon nen code gefunden der passt.... da ich VBA Newbie bin begreif ich leider nicht wie ich die Zelladressierung änder....
Was zum Geier bedeutet J65536?
bitte um Hilfe.....
[b]Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyReturn Then
If Range("J65536").End(xlUp).Offset(1, 0).Row < 6 Then
Cells(6, 10) = Me.TextBox1
Me.TextBox1 = ""
Else
Cells(Range("J65536").End(xlUp).Offset(1, 0).Row, 10) = Me.TextBox1
Me.TextBox1 = ""
End If
End If
End Sub
[/b]
Antwort 1 von Hajo_Zi
Hallo Jaenes,
mit dem Teil wird die letzte belegte Zelle in der Spalte ermittelt. Der Code ist für eine Version vor 2007.
Gruß hajo
mit dem Teil wird die letzte belegte Zelle in der Spalte ermittelt. Der Code ist für eine Version vor 2007.
Gruß hajo
Antwort 2 von Jaenes
??
Bedeutet das es Zeile65536 ist?
oder ist das irgendein vordefinierter code?und J bezeichnet nur die Spalte?
Bedeutet das es Zeile65536 ist?
oder ist das irgendein vordefinierter code?und J bezeichnet nur die Spalte?