Microsoft Excel

Herbers Excel/VBA-Archiv

nochmal ersetzen



Excel-Version: 9.0 (Office 2000)

Betrifft: nochmal ersetzen
von: andré
Geschrieben am: 05.06.2002 - 14:30:54

bezugnehmend auf
https://www.herber.de/forum/messages/126154.html
bin ich jetzt schon ein stück weiter:

For Each ActSh In Worksheets
For Each ActRe In ActSh.UsedRange.Cells
If ActRe.HasFormula And InStr(ActRe.Formula, "serv005") Then
TmpStr = ActRe.Formula
TmpStr = Replace(TmpStr, "serv005", "serv011")
ActRe.Formula = TmpStr
End If
Next ActRe
Next ActSh

aber bei der zeile
actre.formula = tmpstr kommt folgender dialog:

beschriftung indentifizieren
es wurden mehrere zellen mit der folgenden beschriftung gefunden: "serv011" wählen sie die zelle die die zu verwendende beschriftung enthält | |
Ok | abbrechen

wer kann mir jetzt weiterhelfen

  

Re: nochmal ersetzen
von: Martin Beck
Geschrieben am: 08.06.2002 - 08:31:47

Hallo André,

schau noch mal im alten Thread https://www.herber.de/forum/messages/127055.html

Gruß
Martin Beck

 

Beiträge aus den Excel-Beispielen zum Thema "nochmal ersetzen"