Hallo Ihr Lieben,
hab dank der Hilfestellung hier im Forum das einlesen von Zellen in eine Textbox gelernt.
Jetzt zu meinen Problem. Ich füge in die Textbox "Rechnungsnummer" eine 4Stellige Zahl ein die dann direkt in die Telle geschrieben wird.
Private Sub RechnungsNummer_TextBox_Change()
Range("B18") = "P" & RechnungsNummer_TextBox
End Sub
Es wird dann automatisch ein P vor die 4 Stellige Nummer eingefügt.
Wenn ich jetzt die Load funktion nutze, liest er die 4Stellige Nummer + das P ein und fügt dann ein weiteres P hinzu, da ja bei jeder eingabe in die Textbox der eingegebene Wert + ein P in die Zelle eingefügt wird. Drücke ich also 4x mal den Load button steht in der Rechnungsnummer Zelle z.B "PPPPP2020"
Private Sub CommandButtonLoadALL_Click()
Me.RechnungsNummer_TextBox = ActiveSheet.Range("B18")
End Sub
|