bestimmtes Zeichen löschen
18.06.2008 20:25:00
JaLu
Ich hab folgendes Problem:
Ich versuche bei Artikelnummern die Punkte innerhalb der Artikelnummer zu entfernen. Das klappt auch mit den Artikelnummern die keine Nullen am Anfang haben. Leider macht mein Makro aus 000.045031 dann 45031. Die führenden Nullen müssen aber erhalten bleiben. Mein Makro sieht so aus:
Sub Punkt_löschen()
Dim objWks As Worksheet
Set objWks = ThisWorkbook.Worksheets(1)
objWks.Columns(1).Replace ".", "", xlPart
End Sub
Kann mir jemand sagen, wo mein Fehler ist.
Danke
Anzeige