ausführen von mehreren Makros, um über mehrere excel-Arbeitsmappen - vba
Ich habe mehrere excel-Arbeitsmappen, die jeweils ein Tage, jede Arbeitsmappe enthält mehrere Blätter für jede Veranstaltung am Tag..
muss ich laufen, 6 Makros um über jedes Blatt in einer Arbeitsmappe und verschieben Sie dann auf die nächste Arbeitsmappe (alle Arbeitsmappen befinden sich im gleichen Ordner auf dem desktop)
im moment im mit diesen (unten), um die Makros auszuführen, um über alle Blätter, aber im, der Schwierigkeiten hat, versuchen zu bekommen, etwas zu laufen über alle Arbeitsmappen
Sub RUN_FILL()
Dim sh As Worksheet
For Each sh In ThisWorkbook.Worksheets
sh.Activate
Call macro_1
Call macro_2
Call macro_3
Call macro_4
Call macro_5
Call macro_6
Next sh
End Sub
irgendeine Idee, wie ich das tun kann ?
- Sind alle Arbeitsmappen sind zunächst geöffnet, oder die Sie öffnen möchten - / Prozess - / schließen-jeweils in Reihe? Auch wird die Reihenfolge der Arbeitsmappen verarbeitet werden, eine Rolle?
- Die Arbeitsmappen sind alle zunächst geschlossen, abgesehen von einem wo-id ausführen, wird die Arbeitsmappe Reihenfolge spielt keine Rolle, nur die Reihenfolge, in der die Makros ausgeführt werden auf die einzelnen Blätter.
Du musst angemeldet sein, um einen Kommentar abzugeben.
Ich habe nicht deine Makros, so habe ich erstellt dummy-Makros, die Ausgabe einiger Werte in das Direktfenster für jedes Blatt von jeder Arbeitsmappe (mit Ausnahme der Arbeitsmappe mit den Makros).
Du code angezeigt wird, hängt von der Ausgabe makro-Aktivierung jedes Arbeitsblatt. Dies ist eine schlechte Praxis. Ich gehe in die Arbeitsmappe und den Namen des Arbeitsblattes, zu dem Sie die Makros. I output den Wert von Zelle A1 (
.Cells(1, 1).Value
), um zu zeigen, wie es gemacht wird.Ich hoffe das ist genug, um Ihnen den Einstieg. Fragen, wenn etwas unklar ist.
Pseudo-code Gliederung: