Wie kann man dasselbe Makro in Excel auf mehreren Arbeitsblättern gleichzeitig ausführen?
Normalerweise können wir ein Makro in einem Arbeitsblatt ausführen. Wenn mehrere Blätter dasselbe Makro anwenden müssen, sollten Sie den Code einzeln auslösen. Gibt es eine andere schnelle Möglichkeit, dasselbe Makro in Excel auf mehreren Arbeitsblättern gleichzeitig auszuführen?
Führen Sie dasselbe Makro auf mehreren Arbeitsblättern gleichzeitig mit VBA-Code aus oder führen Sie es aus
Um ein Makro auf mehreren Blättern gleichzeitig auszuführen, ohne es einzeln auszulösen, können Sie den folgenden VBA-Code anwenden. Gehen Sie dazu folgendermaßen vor:
1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. Klicken Sie Insert > Modulund fügen Sie das folgende Makro in das Feld ein Modul Fenster.
VBA-Code: Führen Sie dasselbe Makro gleichzeitig auf mehreren Arbeitsblättern aus:
Sub Dosomething()
Dim xSh As Worksheet
Application.ScreenUpdating = False
For Each xSh In Worksheets
xSh.Select
Call RunCode
Next
Application.ScreenUpdating = True
End Sub
Sub RunCode()
'your code here
End Sub
Note: Kopieren Sie im obigen Code Ihren eigenen Code und fügen Sie ihn ohne den Code ein Sub Überschrift und End Sub Fußzeile zwischen dem Sub Runcode () und End Sub Skripte. Siehe Screenshot:
3. Setzen Sie dann den Cursor auf das Makro des ersten Teils und drücken Sie F5 Taste, um den Code auszuführen, und Ihr Makrocode wird einzeln auf ein Blatt angewendet.
Entfernen Sie alle Makros aus mehreren Arbeitsmappen:
Kutools for Excel's Batch Entfernen Sie alle Makros Das Dienstprogramm kann Ihnen dabei helfen, alle Makros nach Bedarf aus mehreren Arbeitsmappen zu entfernen. Laden Sie jetzt Kutools für Excel herunter und testen Sie es kostenlos! Kutools for Excel: Mit mehr als 300 praktischen Excel-Add-Ins können Sie es innerhalb von 30 Tagen ohne Einschränkung testen. Jetzt herunterladen und kostenlos testen! |
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!