Makro läuft nicht
02.04.2014 13:11:24
Wilfied
ich habe vor einiger Zeit über den Makrorecorder in Excel 2003 ein Makro aufgezeichnet.
Jetzt wurde bei uns Windows XP abgeschaltet und ich muss das Makro in Excel 2010 ausführen.
Im Grunde ist die Angelegenheit sehr simpel.
Ich habe Formeln im ersten Tabellenblatt die sich auf Zellen in einem weiterem Tabellenblatt beziehen, welches erst im Laufe des Prozesses erstellt wird.
Da da zweite Tabellenblatt in der Vorlage nicht existiert (und auch nicht erstellt werden kann) steht in der Formel natürlich "=WENN(ISTNV(SVERWEIS(#BEZUG!;#BEZUG!;1;FALSCH));0;(SVERWEIS(#BEZUG!;#BEZUG!;1;FALSCH)))".
Aufgabe des Makro war es jetzt die Bezüge wieder herzustellen.
Wenn ich von Hand mit Suchen und Ersetzen arbeite, funktioniert die ganze Sache bestens.
Auch beim Aufzeichnen des Makros komme ich zum gewünschten Ergebnis.
Lasse ich aber das Makro nachher laufen, tut sich rein garnichts.
Sub Ersetzen()
' Ersetzen Makro
Cells.Replace What:="#BEZUG!;#BEZUG!", Replacement:="E2;'Spinst (2)'!B:Q", _
LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:= _
False, ReplaceFormat:=False
End Sub
Will