Microsoft Excel

Herbers Excel/VBA-Archiv

Cells.Replace ??

Betrifft: Cells.Replace ?? von: Hobbit2000
Geschrieben am: 03.09.2004 10:33:42

Hallo,

ich möchte in mehreren Sheets nach einem vorher Definierten Begriff (Vormonat) Suchen und diesen durch einen anderen Begriff (Monat) ersetzen. Hätte das so gemacht:

Sheets(Array("SPL raw data (DI-all)", "SPL raw data (DI-1only)", "DI 1 ranking (data)")).Cells.Replace What:=""" & Vormonat & """, Replacement:=""" & Monat & """, LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False

Funktioniert aber nicht. Vormonat und Monat werden übrigens aus einer anderen Mappe übernommen und sind als String definiert. Wo ist der Fehler??

Vielen Dank Hobbit2000

  


Betrifft: AW: Cells.Replace ?? von: Boris
Geschrieben am: 03.09.2004 10:39:17

Hi,

dann durchlauf doch alle Blätter in einer Schleife.

Grüße Boris


  


Betrifft: AW: Cells.Replace ?? von: Hobbit2000
Geschrieben am: 03.09.2004 10:49:23

Hallo,

habe jetzt folgenden Code geschrieben.
For i = 1 To 3
Sheets(i + 1).Cells.Replace What:=""" & Vormonat & """, Replacement:=""" & Monat & """, LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False
Next i

Das Problem ist das er Vormonat und Monat wörtlich nimmt, und nicht den ihnen zugeordneten Begriff welcher z.B. währe Vormonat = June, Monat = July.

Wie muß ich das in der Replace Funktion formulieren???

Dankesehr Hobbit2000


  


Betrifft: Hat sich erledigt von: Hobbit2000
Geschrieben am: 03.09.2004 10:56:07

Hallo,

habe das Problem selber gefunden. Mußte nur die "" entfernen

Grüße Hobbit2000