Microsoft Excel

Herbers Excel/VBA-Archiv

Suchen/Ersetzen für Worksheet

Betrifft: Suchen/Ersetzen für Worksheet von: th0mas
Geschrieben am: 18.08.2004 11:15:38

Hi!

Ich habe eine VBA-SuchErsetzRoutine geschrieben die wie folgt aussieht:

For i = 0 To 2
Cells.Replace What:=newFY - i - 1, Replacement:=newFY - i, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False
Next

diese routine wird 3x durchgeführt, jedoch nur für ein Worksheet. Kann ich irgendwas vor/statt Cells.Replace setzen damit das ganze Workbook durchsucht wird? oder wenn ich es in einer zusätzlichen For-schleife verschachteln soll, wie kann ich die Anzahl an Worksheets ermitteln?

  


Betrifft: AW: Suchen/Ersetzen für Worksheet von: chris b
Geschrieben am: 18.08.2004 11:20:38

for each Schleife Hilft dir !


For each mysheet in activeworkbook.worksheets
'hier eine befehlszeilen
next


grüße Chris


  


Betrifft: AW: Suchen/Ersetzen für Worksheet von: th0mas
Geschrieben am: 18.08.2004 11:25:58

danke!!