Vor-/Nachname trennen und Hinweis
20.06.2020 18:40:48
MarC
ich habe eine TextBox in der man den Vor- und Nachnamen eingeben kann. Der Vorname wird dann in die Celle 55 geschrieben und der Nachname in die Celle 56. Wenn jetzt jemand aus irgend einen Grund nur den Vor oder Nachnamen angibt erhalte ich den Laufzeitfehler 9. Wie kann ich denn die Zelle fragen ob nur ein Wort drin steht? Aktuell sieht mein Code so aus. Ich müsste jetzt noch schreiben Elseif "wie viele Wörter stehen in der Textbox wenn 1 dann ..... Ich würde mich freuen wenn mir wer helfen kann.
If strName = "" Then
.Cells(ZeileEdit, 55).Value = ""
.Cells(ZeileEdit, 56).Value = ""
ElseIf strName "" Then
.Cells(ZeileEdit, 55).Value = Trim(Split(strName, " ")(0))
.Cells(ZeileEdit, 56).Value = Trim(Split(strName, " ")(1))
End If