Làm cách nào để mở nhanh tất cả các tệp Excel từ một thư mục?
Trong bài viết này, tôi giới thiệu macro để mở tất cả các sổ làm việc từ một thư mục cụ thể.
Mở tất cả các sổ làm việc trong một thư mục với VBA
Liệt kê tất cả các tên tệp của một thư mục cụ thể với Kutools cho Excel
Mở tất cả các sổ làm việc trong một thư mục với VBA
1. nhấn Alt + F11 chìa khóa để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
2. nhấp chuột Chèn > Mô-đunvà dán mã bên dưới vào tập lệnh.
VBA: Mở tất cả các tệp Excel trong một thư mục
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. nhấn F5 , một hộp thoại bật ra để chọn một thư mục bạn muốn mở tất cả các sổ làm việc trong đó. Xem ảnh chụp màn hình:
4. nhấp chuột OKvà tất cả các sổ làm việc trong thư mục cụ thể đã được mở.
Liệt kê tất cả các tên tệp của một thư mục cụ thể với Kutools cho Excel
Ngoại trừ việc mở các tệp trong một thư mục, bạn đã bao giờ thử liệt kê tất cả các tên tệp của một thư mục cụ thể chưa? Với Kutools cho Excel'S Danh sách tên tệp tiện ích, bạn có thể nhanh chóng liệt kê tất cả các loại hoặc một loại tệp cụ thể trong một thư mục.
Kutools cho Excel, với hơn 300 chức năng tiện dụng, giúp công việc của bạn dễ dàng hơn. |
Sau cài đặt miễn phí Kutools cho Excel, vui lòng làm như sau:
1. nhấp chuột Kutools Plus > Nhập khẩu xuất khẩu > Danh sách tên tệp. Xem ảnh chụp màn hình:
2. bên trong Danh sách tên tệp , chọn thư mục bạn muốn liệt kê tệp, chỉ định loại tệp bạn muốn liệt kê, sau đó chỉ định đơn vị kích thước tệp khi bạn cần. Nếu muốn, bạn có thể tạo siêu liên kết đến tên tệp sẽ liệt kê. Xem ảnh chụp màn hình:
3. nhấp chuột Okvà tất cả các tệp trong thư mục cụ thể đã được liệt kê trong một trang tính mới của sổ làm việc đang hoạt động. Xem ảnh chụp màn hình:
Liệt kê tất cả các tên tệp của một thư mục
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!