Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1072to1076
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Wert in Formel ersetzen
12.05.2009 15:07:53
uwe
Hallo,
ich habe in einem Blatt viele Formeln nach dem Stil
='\\alt\Produktion\WKZ\BMW\[0930.XLS]0930 L'!$A$7
Hier sollen in allen Formlen der Pfad geändert werden.
z.B
='\\neu\Produktion\WKZ\BMW\[0930.XLS]0930 L'!$A$7
Ich hatte es mit

Sub Ersetzen()
Dim Bereich As Range
Dim Zelle As Range
Set Bereich = Range("C3", "C12") 'Range anpassen
For Each Zelle In Bereich
With Zelle
.Value = Application.Substitute(.Value, "='\\alt\Produktion\WKZ\BMW\[0930.XLS]0930 L'!$A$ _
7
", "='\\neu\Produktion\WKZ\BMW\[0930.XLS]0930 L'!$A$7
")
End With
Next Zelle
Set Bereich = Nothing
End Sub


2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert in Formel ersetzen
12.05.2009 15:19:57
georg
Hallo,
zuerst mal würde ich bei jedem "Ersetzen" eine Sicherungskopie machen. Wenn du ein Makro laufen lässt, dann ist das nicht rückgängig zu machen.
Eigentlich kannst Du das auch einfach über Suchen und Ersetzen regeln...
Und in VBA reicht eine einzige Zeile:
Cells.Replace What:="\\alt\", Replacement:="\\neu\", LookAt:=xlPart
Hoffe es klappt.
LG Georg
AW: Wert in Formel ersetzen
13.05.2009 09:02:12
uwe
Danke Georg
Gruss
Uwe
Anzeige

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige