Herbers Excel-Forum - das Archiv
Suchen + Ersetzen von #NV als Text
- Suchen + Ersetzen von #NV als Text von Klaus vom 14.11.2003 20:40:05
- AW: Suchen + Ersetzen von #NV als Text - von Nepumuk am 14.11.2003 20:52:00
- Danke Nepumuk, klappt super. - von Klaus am 14.11.2003 21:05:23
- Danke Nepumuk, klappt super. - von Klaus am 14.11.2003 21:05:23
- AW: Suchen + Ersetzen von #NV als Text - von Nepumuk am 14.11.2003 20:52:00
 |
Betrifft: Suchen + Ersetzen von #NV als Text
von: Klaus
Geschrieben am: 14.11.2003 20:40:05
Guten Abend Forum,
ich habe einen Bereich ("J6:BP47"), in dem unterschiedliche
Texte stehen, u. a. auch "#NV" (als Text!). Nun das Problem:
Ich möchte über den Suchen+Ersetzen-Befehl "#NV" durch ein " "
(Blanc) ersetzen. Das klappt auch bestens, wenn ich den Vorgang
manuell durchführe. Sobald ich den Ablauf aber als Makro aufzeichne
und abspiele passiert - nichts.
Hier das Makro
Sub NV_Überschreiben()
Range("J6:BP47").Select
Selection.Replace What:="#NV", Replacement:=" ", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Range("A1").Select
End Sub
Hat jemand von Euch dafür eine Erklärung? Macht das
Sonderzeichen # im Makro Probleme?
Für Antworten vielen Dank im vorweg
Klaus
 |
Betrifft: AW: Suchen + Ersetzen von #NV als Text
von: Nepumuk
Geschrieben am: 14.11.2003 20:52:00
Hallo Klaus,
mach es so:
Option Explicit
Sub NV_Überschreiben()
Dim myRange As Range
For Each myRange In Range("J6:BP47")
If IsError(myRange) Then myRange = ""
Next
End Sub
Code eingefügt mit: Excel Code Jeanie
Gruß
Nepumuk
|
Betrifft: Danke Nepumuk, klappt super.
von: Klaus
Geschrieben am: 14.11.2003 21:05:23
Danke Nepumuk, klappt super.
Einen schönen Abend noch
Klaus
| |