zeichen in Zelle löschen

deen_90

Erfahrenes Mitglied
hallo

Wie kann ich in einer Zelle die ersten paar Zeichen löschen und am Ende?

Also das Problem ist, dass nicht überall diese Zeichen stehen wie zum beispiel:

1100027744_Herbst steht in einer Zelle dann 1100101126_Tissari oder nur der Name.
Jetzt möchte ich gerne die Zahlen löschen, aber sie sind immer unterschiedlich.wie kann ich das machen?

Das andere Problem ist, dass am Ende von verschiedenen Vornamen **deleted** steht und das möchte ich löschen. Der Name ist immer anderst.

Momentan hab ich so:

For i = 22000 To 1 Step -1
If Cells(i, 7) = "**deleted**" Then Cells(i, 6) = Mid(Cells(i, 6), 1, Len(Range(i, 6)) - 11)
Next

aber er reagiert nicht, da keine Zelle nur **deleted** ist.

Ich wäre sehr froh wenn mir jemand helfen könnte, ich komme überhaupt nicht weiter.

glg deni
 
Schau dir mal den Befehl Replace oder im deutschen Excel Ersetzten an damit kannst du das lösen.

Beispiel zu 2

Visual Basic:
 cell (x,y). value = Replace(cell (x,y). value ,"****deleted*****","")

für 1 würde ich ähnlich vorgehen und die Ziffern 0-9 mit nichts ersetzten

Grüsse bb
 
Zurück