ich muss in einer Tabelle - Bereich Z1:AB100 zahlen und : - isolieren und die Buchstaben löschen.
Formate 07-08 ; 07-08:30
Könnte mir jemand bei dem Code helfen?
Viele Grüße und Dank im Voraus
Mark
Sub Makro1()
Range("Z1:AB100").Replace What:="* ", Replacement:="'", LookAt:=xlPart
End Sub
Gruß Werner=Teil(Tabelle1!Z1;Finden(" ";Tabelle1!Z1)+1;999)