Nullen in Bereich entfernen
05.10.2006 09:16:05
Jutta
ich habe folgendes Makro um die 0 zu entfernen:
Sub Nullen_entfernen()
Columns("M:W").Select
Selection.Replace What:="0", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub
Nur löscht es mir jetzt wirklich jede 0, auch wenn z.B. ein Text "40 cm " dasteht dann wird " 4 cm " daraus.
Wie muss das Makro aussehen, damit wirklich nur die Zellen geleert werden,in denen nur ein 0 steht ?
LG
Jutta
Anzeige