Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Makro Arbeitsmappe





Frage

Hallo Leute, mein Problem sieht so aus: Ich habe an unsere 70 europäischen Töchter ein Excel-File zukommen lassen. Jetzt kam raus, dass in dem File ein Fehler ist. Ich habe nun ein Makro aufgezeichnet, was diesen Fehler beheben soll. Jedoch weiß ich nicht, wir ich das File gestalten muss, damit alle 70 Länder diesen Korrektur-Makro laufen lassen können, da ja die Bezeichnungen immer unterschiedlich sind. Der eine heisst: TT IRELAND - ACTUAL 2008.xls, der andere FU SPAIN - ACTUAL 2008.xls... Das einzige, was immer gleichbleibt ist am Ende "...-ACTUAL 2008.xls" Danke für eure schnelle Hilfe. Sub Makro1() ' ' Makro1 Makro Windows("TT IRELAND - ACTUAL 2008.xls").Activate Sheets("OVERVIEW").Select ActiveSheet.Unprotect ("8") ActiveWindow.SmallScroll Down:=-93 ActiveSheet.Unprotect ActiveWindow.SmallScroll Down:=-21 Range("U3:U67").Select Selection.Locked = False Selection.FormulaHidden = False ActiveWindow.SmallScroll Down:=39 Range("U72:U121").Select Selection.Locked = False Selection.FormulaHidden = False ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True ActiveWorkbook.Save End Sub

Antwort 1 von coros

Hallo Diogeness,

warum erstellst Du nicht ein AddIn, dass eine Symbolleiste mit einem Button beinhaltet, über den das Makro gestartet wird. Die erste Zeile

Windows("TT IRELAND - ACTUAL 2008.xls").Activate


in Deinem Makro läst Du weg. Wenn Du das AddIn öffnest un danach die Datei um die es geht und dann den Button betätigst, wird das Makro auf die gerade aktive und somit auf die Datei, die geändert werden soll, angewendet.

Wäre das eine Alternative für Dich?

MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

Antwort 2 von coros

Hallo Diogeness,

ich habe Dir mal ein solches AddIn erstellt. Du kannst Dir das unter http://www.excelbeispiele.de/Beispiele_Supportnet/ACTUAL 2008.xla herunterladen. Wenn Du zuerst das AddIn öffnest, durch das Dir die Symbolleiste erstellt wird und danach die Datei, die geändert werden soll, sollte es funktionieren.

MfG,
Oliver
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du
ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: