Ich muß per VBA in einer Zelle Zu- und Vorname vertauschen. Kann mir da jemand helfen?
Danke für Eure Mühe
Sigi
Function Umkehren(Text As String)
Dim Zähler
For Zähler = 1 To Len(Text)
If Mid(Text, Zähler, 1) = " " Then _
Exit For
Next
Umkehren = Mid(Text, Zähler + 1, Len(Text) - Zähler - 1) & " " & Left(Text, Zähler - 1)
End Function
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen