Kako zagnati makro hkrati v več datotekah delovnih zvezkov?
V tem članku bom govoril o tem, kako zagnati makro v več datotekah delovnega zvezka hkrati, ne da bi jih odprli. Naslednja metoda vam lahko pomaga pri reševanju te naloge v Excelu.
Zaženite makro istočasno v več delovnih zvezkih s kodo VBA
Zaženite makro istočasno v več delovnih zvezkih s kodo VBA
Če želite zagnati makro v več delovnih zvezkih, ne da bi jih odprli, uporabite naslednjo kodo VBA:
1. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.
2. Kliknite Vstavi > Moduliin v mapo prilepite naslednji makro Moduli Okno.
Koda VBA: zaženite isti makro na več delovnih zvezkih hkrati:
Sub LoopThroughFiles()
Dim xFd As FileDialog
Dim xFdItem As Variant
Dim xFileName As String
Set xFd = Application.FileDialog(msoFileDialogFolderPicker)
If xFd.Show = -1 Then
xFdItem = xFd.SelectedItems(1) & Application.PathSeparator
xFileName = Dir(xFdItem & "*.xls*")
Do While xFileName <> ""
With Workbooks.Open(xFdItem & xFileName)
'your code here
End With
xFileName = Dir
Loop
End If
End Sub
Opombe: V zgornjo kodo kopirajte in prilepite svojo kodo brez spodaj naslov in End Sub noga med Z delovnimi zvezki.Open (xFdItem & xFileName) in Končaj s skripte. Oglejte si posnetek zaslona:
3. Nato pritisnite F5 tipko za izvajanje te kode in a Brskanje okno se prikaže, izberite mapo, ki vsebuje delovne zvezke, za katere želite, da vsi uporabljajo ta makro, glejte posnetek zaslona:
4. In nato kliknite OK gumb, se bo želeni makro izvedel naenkrat iz enega delovnega zvezka v drugega.
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!