Cum se deschid rapid toate fișierele Excel dintr-un folder?
În acest articol, introduc macro-ul pentru a deschide toate registrele de lucru dintr-un folder specific.
Deschideți toate registrele de lucru dintr-un folder cu VBA
Enumerați toate numele fișierelor unui anumit folder cu Kutools pentru Excel
Deschideți toate registrele de lucru dintr-un folder cu VBA
1. presa Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. clic Insera > Moduleși lipiți codul de mai jos în script.
VBA: Deschideți toate fișierele Excel dintr-un folder
Sub OpenFiles()
'UpdateByExtendoffice20160623
Dim xStrPath As String
Dim xFileDialog As FileDialog
Dim xFile As String
On Error Resume Next
Set xFileDialog = Application.FileDialog(msoFileDialogFolderPicker)
xFileDialog.AllowMultiSelect = False
xFileDialog.Title = "Select a folder [Kutools for Excel]"
If xFileDialog.Show = -1 Then
xStrPath = xFileDialog.SelectedItems(1)
End If
If xStrPath = "" Then Exit Sub
xFile = Dir(xStrPath & "\*.xlsx")
Do While xFile <> ""
Workbooks.Open xStrPath & "\" & xFile
xFile = Dir
Loop
End Sub
3. presa F5 tasta, apare un dialog pentru selectarea unui folder pe care doriți să îl deschideți toate registrele de lucru din acesta. Vedeți captura de ecran:
4. clic OKși toate registrele de lucru din folderul specific au fost deschise.
Enumerați toate numele fișierelor unui anumit folder cu Kutools pentru Excel
Cu excepția pentru a deschide fișiere într-un folder, ați încercat vreodată să enumerați toate numele fișierelor dintr-un folder specific? Cu Kutools pentru Excel'S Lista de nume de fișiere utilitar, puteți lista rapid toate tipurile sau un anumit tip de fișiere într-un singur folder.
Kutools pentru Excel, cu mai mult de 300 funcții la îndemână, vă face munca mai ușoară. |
După instalare gratuită Kutools pentru Excel, faceți următoarele:
1. clic Kutools Plus > Import Export > Lista de nume de fișiere. Vedeți captura de ecran:
2. În Lista de nume de fișiere , selectați un folder din care doriți să listați fișierele, specificați tipul de fișier pe care doriți să îl listați, apoi specificați unitatea dimensiunii fișierului după cum aveți nevoie. Dacă doriți, puteți crea hyperlinkuri către numele fișierelor care vor fi listate. Vedeți captura de ecran:
3. clic Okși toate fișierele din folderul specific au fost listate într-o nouă foaie a registrului de lucru activ. Vedeți captura de ecran:
Enumerați toate numele fișierelor unui dosar
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!