Hi,
ich habe eine Excel, in der viele Namen stehen. Vor den Namen stehen Nummer, also 1., 2., 3. usw. Gibt es ein Befehl, wie ich diese Zahlen wegbekomme? Z.B. ein Befehl, womit die ersten beiden Zeichen eines jeden Bereiches gelöscht werden?
Würde mich auf eine Antwort von euch freuen.
Gruß
Als BEISPIEL:
Sub Kuerzen()
For i = 1 To 3
Cells(i, 2).Value = Mid$(Cells(i, 1).Value, 3)
Next i
End Sub
Dieses Makro entfernt bei Aufruf aus den Zellen A1…A3 jeweils die ersten beiden Zeichen und schreibt das Resultat in B1…B3.
Sub Kuerzen2()
For Each meineZelle In UsedRange
meineZelle.Value = Mid$(meineZelle.Value, 3)
Next meineZelle
End Sub
Dieses Makro schneidet bei Aufruf aus allen Zellinhalten in der aktuellen Tabelle die ersten beiden Zeichen weg.
Gruss,
Michael
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Hallo
Du kannst es auch ohne Makro mit einer Formel machen:
Angenommen in A1 steht „23. Heinrich Müller“, dann gib in B1 folgende Formel ein:
=RECHTS(A1;LÄNGE(A1)-FINDEN(" ";A1)).
Wichtig ist, bei FINDEN zwischen die Anführungszeichen das richtige Zeichen einzugeben: Hier ist es zum Beispiel ein Leerschlag (der Leerschlag hinter 23. ).
Ich hoffe, es klappt. Sonst sag es einfach.
Grüsse Niclaus
Perfekt
))
hat geklappt… vielen vielen Dank. super
Vielen vielen Dank für deine große Mühe
))
Werde versuchen es als Makro zu programmieren