Sut i agor pob ffeil Excel o ffolder yn gyflym?
Yn yr erthygl hon, rwy'n cyflwyno'r macro i agor pob llyfr gwaith o ffolder benodol.
Agorwch yr holl lyfrau gwaith mewn ffolder gyda VBA
Rhestrwch holl enwau ffeil un ffolder penodol gyda Kutools ar gyfer Excel
Agorwch yr holl lyfrau gwaith mewn ffolder gyda VBA
1. Gwasgwch Alt + F11 allweddi i agor Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Cliciwch Mewnosod > Modiwlau, a gludo islaw'r cod i'r sgript.
VBA: Agorwch yr holl ffeiliau Excel mewn ffolder
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. Gwasgwch F5 allwedd, mae deialog yn ymddangos ar gyfer dewis ffolder rydych chi am agor yr holl lyfrau gwaith ynddo. Gweler y screenshot:
4. Cliciwch OK, ac mae'r holl lyfrau gwaith yn y ffolder benodol wedi'u hagor.
Rhestrwch holl enwau ffeil un ffolder penodol gyda Kutools ar gyfer Excel
Ac eithrio agor ffeiliau mewn ffolder, a ydych erioed wedi ceisio rhestru holl enwau ffeiliau un ffolder benodol? Gyda Kutools ar gyfer Excel'S Rhestr Enw Ffeil cyfleustodau, gallwch chi restru pob math neu un math penodol o ffeiliau yn gyflym mewn un ffolder.
Kutools ar gyfer Excel, gyda mwy na 300 swyddogaethau defnyddiol, yn gwneud eich swyddi yn haws. |
Ar ôl gosod am ddim Kutools ar gyfer Excel, gwnewch fel isod:
1. Cliciwch Kutools Byd Gwaith > Mewnforio ac Allforio > Rhestr Enw Ffeil. Gweler y screenshot:
2. Yn y Rhestr Enw Ffeil deialog, dewiswch ffolder rydych chi am restru ffeiliau ohono, nodwch y math o ffeil rydych chi am ei rhestru, ac yna nodwch uned maint y ffeil yn ôl yr angen. Os ydych chi eisiau, gallwch greu hypergysylltiadau i'r enwau ffeiliau a fydd yn rhestru. Gweler y screenshot:
3. Cliciwch Ok, ac mae'r holl ffeiliau yn y ffolder benodol wedi'u rhestru ar ddalen newydd o'r llyfr gwaith gweithredol. Gweler y screenshot:
Rhestrwch Holl Enwau Ffeil Ffolder
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!