Ich weiß ja das das bestimmt ganz einfach ist...
Und diese tolle Comunity hier... Hilft mir bestimmt...
Also ich öffne per Comate eine Excel-Datei...
Ich möchte nun in der Tabelle alles ersetzten z.B.: #Werner2
Steht in der Tabelle irgendwo auch mehrmals...
Das möchte ich dann mit #Betti ersetzten....
Weiß jemand wie das geht ?
In Word geht das ja...
Code: Alles auswählen
ExcelObject\SetProperty("ActiveSheet\Replace\MatchWholeWord = #True")
ExcelObject\SetProperty("ActiveSheet\Replace\Forward = #True")
ExcelObject\SetProperty("ActiveSheet\Replace\Text = '" + search$ + "'")
ExcelObject\Invoke("ActiveSheet\Replace\Execute(#Opt, #Opt, #Opt, #Opt, #Opt, #Opt, #Opt, #Opt, #Opt, '" + replace$ + "', " + Str(#wdReplaceAll) + ")")
Grüße
Sascha