Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
304to308
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
304to308
304to308
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Hilfe, falsche Nullen werden gelöscht

Hilfe, falsche Nullen werden gelöscht
09.09.2003 15:46:25
Meline
Hallo Forum,

ich habe ein Macro aufgezeicht und dann angepasst für das Kopieren eines Worksheets (nur Values) und anschließendem Löschen der Werte mit 0.
Leider wird jetzt bei der Zahl 40 auch die Null gelöscht und es steht nur noch 4 da. Wie kann ich das verhindern?

Code:
Sheets("1.2").Select
Range("A1:Z20").Select
Selection.Copy
Range("M1").Select

Sheets("1.2 Approved").Select
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues
Selection.Replace What:="0", Replacement:=""
Range("M1").Select

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hilfe, falsche Nullen werden gelöscht
09.09.2003 15:53:01
Nike
Hi,
abgesehen von den Selects, würde ich so ersetzen:

Selection.Replace What:="0", Replacement:="", LookAt:=xlWhole

Bye

Nike
AW: Hilfe, falsche Nullen werden gelöscht
09.09.2003 15:53:49
Ronny
So klappt es

Selection.Replace What:="0", Replacement:="", LookAt:=xlWhole, SearchOrder:=xlByRows, MatchCase:=False

Gruß
Ronny
AW: Hilfe, falsche Nullen werden gelöscht
09.09.2003 15:54:01
Ronny
So klappt es

Selection.Replace What:="0", Replacement:="", LookAt:=xlWhole, SearchOrder:=xlByRows, MatchCase:=False

Gruß
Ronny

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige