Note: The other languages of the website are Google-translated. Back to English

Làm cách nào để tạo nhanh thư mục dựa trên giá trị ô trong Excel?

Giả sử bạn có một danh sách tên nhân viên trong một loạt trang tính và bây giờ bạn muốn tạo một số thư mục cho mỗi tên trong các ô để ghi thông tin của họ. Nếu bạn tạo từng thư mục một thì sẽ rất lãng phí thời gian. Nhưng làm thế nào bạn có thể nhanh chóng tạo các thư mục này? Hôm nay, tôi sẽ giới thiệu cho bạn một số thủ thuật nhanh:

Tạo thư mục dựa trên giá trị ô với mã VBA

Nhanh chóng tạo các thư mục dựa trên các giá trị ô với Kutools cho Excelý kiến ​​hay3


Tạo thư mục dựa trên giá trị ô với mã VBA

Ví dụ: tôi có một loạt các tên trong một trang tính, tôi muốn tạo các thư mục cho mỗi tên và lưu chúng vào một đường dẫn được chỉ định, với mã VBA, tôi có thể hoàn thành công việc này.

1. Đặt sổ làm việc đang hoạt động vào một thư mục cụ thể mà bạn sẽ đặt các thư mục đã tạo vào. Mở sổ làm việc và chọn phạm vi ô mà bạn muốn sử dụng.

doc-create-folder1

2. Nhấp chuột Nhà phát triển > Visual Basic, Một mới Microsoft Visual Basic cho các ứng dụng cửa sổ sẽ được hiển thị, nhấp vào Chèn > Mô-đunvà nhập mã sau vào Mô-đun:

Mã VBA: tạo thư mục dựa trên giá trị ô

Sub MakeFolders()
Dim Rng As Range
Dim maxRows, maxCols, r, c As Integer
Set Rng = Selection
maxRows = Rng.Rows.Count
maxCols = Rng.Columns.Count
For c = 1 To maxCols
r = 1
Do While r <= maxRows
If Len(Dir(ActiveWorkbook.Path & "\" & Rng(r, c), vbDirectory)) = 0 Then
MkDir (ActiveWorkbook.Path & "\" & Rng(r, c))
On Error Resume Next
End If
r = r + 1
Loop
Next c
End Sub

3. Nhấp chuột doc-nhân-tính-3 để thực thi mã. Tất cả các ô đã chọn đã được tạo vào các thư mục với các giá trị của chúng. Và các thư mục được đặt vào đường dẫn giống như sổ làm việc đang hoạt động. Xem ảnh chụp màn hình:

doc-create-folder2


Nhanh chóng tạo các thư mục dựa trên các giá trị ô với Kutools cho Excel

Thật dễ dàng và thuận tiện cho bạn để tạo các thư mục dựa trên giá trị ô nếu bạn sử dụng công cụ - Kutools cho Excel.

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 khi cài đặt Kutools cho Excel, vui lòng làm như sau:(Tải xuống miễn phí Kutools cho Excel ngay!)

1. Chọn phạm vi mà bạn muốn tạo thư mục.

2. Nhấp chuột Kutools Plus > Nhập khẩu xuất khẩu > Tạo thư mục từ nội dung ô…, Xem ảnh chụp màn hình:

doc tạo thư mục 1

3. Trong Tạo thư mục từ nội dung ô hộp thoại, nhấn doc-create-folder3để chỉ định đường dẫn bạn muốn lưu các thư mục. Đã xem ảnh chụp màn hình:

doc tạo thư mục 2

4. Nhấp chuột OK. Và một hộp nhắc nhở sẽ nhắc bạn có bao nhiêu thư mục đã được tạo. Xem ảnh chụp màn hình:

doc tạo thư mục 3

5. Nhấp chuột OK. Và tất cả các giá trị trong phạm vi đã chọn đã được tạo các thư mục trong thư mục được chỉ định.
doc tạo thư mục 4


Liệt kê tất cả các tên tệp từ một thư mục vào một trang tính

để biết thêm về chức năng này.

Đây là một tiện ích trong Kutools cho Excel - Danh sách tên tệp có thể liệt kê tất cả các tên tệp của một thư mục trong một trang tính, nếu bạn quan tâm đến nó, vui lòng đọc tiếp.

Sau khi cài đặt Kutools cho Excel, vui lòng làm như sau:(Tải xuống miễn phí Kutools cho Excel ngay!)

1. nhấp chuột Kutools Plus > Import / Export > Danh sách tên tệp.
doc tạo thư mục 5

2. bên trong Danh sách tên tệp hộp thoại, chọn một thư mục bạn muốn liệt kê các tệp của nó, dấu kiểm Tất cả các file or Chỉ định tùy chọn như bạn cần trong Tệp loại section.
img src="/images/stories/doc-excel/create-folders/doc-create-folder-6.png" alt="doc tạo thư mục 6" />

3. nhấp chuột Ok, một trang tính mới được tạo với tất cả tên tệp và một số thông tin tương đối.
doc tạo thư mục 7


Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn

  • Tái sử dụng: Chèn nhanh công thức phức tạp, biểu đồ và bất cứ thứ gì bạn đã sử dụng trước đây; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
  • Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
  • Hợp nhất các ô / hàng / cột mà không làm mất dữ liệu; Nội dung phân chia ô; Kết hợp các hàng / cột trùng lặp... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
  • Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
  • Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
  • Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
  • Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
  • Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
  • Hơn 300 tính năng mạnh mẽ. Hỗ trợ Office / Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Bảo đảm hoàn lại tiền trong 60 ngày.
tab kte 201905

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!
officetab dưới cùng
Nhận xét (61)
Chưa có xếp hạng. Hãy là người đầu tiên xếp hạng!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Lỗi trong việc làm theo hướng dẫn VBA là gì? Làm trong khi r
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn bạn đã trả lời, mã VBA có một số câu hỏi nhỏ khi tôi chỉnh sửa nó, vì vậy ở đây tôi đã sửa đổi nó và nó áp dụng thành công, hãy thử nó. Chúc may mắn!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
SkyYang! Chúc may mắn!Bởi skyyang[/ quote] BẠN TUYỆT VỜI !! Tôi đã có thể làm việc năng suất hơn nhờ chương trình (mã VBA trong Developer).
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Ai đã từng viết ví dụ đầu tiên - Bạn thật tuyệt vời !!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
làm ơn, tôi cần macro tương tự nhưng thay vì lưu chúng dưới dạng thư mục, tôi cần nó để lưu giấy ghi chú chỉ với tên ô trong một phạm vi cột, đánh giá cao sự hỗ trợ.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tốt ... :) Cảm ơn bạn .. Nó làm cho tôi làm việc đơn giản.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn điều này đã tiết kiệm cho tôi rất nhiều thời gian. Nhưng làm thế nào để tạo thư mục con?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn rất nhiều!!! Đây là giải pháp tuyệt vời và hiệu quả nhất và dễ dàng nhất mà tôi đã tìm thấy trên internet cho việc này! :cười lớn:
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
:-) Cảm ơn bạn đã cung cấp dữ liệu này .... đã tiết kiệm rất nhiều thời gian của tôi
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Làm thế nào để thực hiện việc này trong LibreOffice hoặc OpenOffice Vui lòng trả lời.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
HELP !!! Tôi có hơn 7500 thư mục để tạo nhưng chương trình đang gặp lỗi biên dịch làm nổi bật [b] Sub MakeFolders () [b] như thể đó là một tên không hợp lệ hoặc một cái gì đó! Tôi đang sử dụng Excel 2010.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi cũng gặp vấn đề tương tự, nhưng khi tôi nhìn vào tên thư mục gần hơn thì có dấu / và sau khi tôi xóa nó, mã hoạt động như một sự quyến rũ.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Bạn là một cứu cánh !!!!! [b] Cảm ơn bạn! [b] Lưu ý: Không đặt dấu cách giữa MakeFolder và ().
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Vì một số lý do, sổ làm việc đang hoạt động đang gặp sự cố với đường dẫn. HELPPPP: cry:
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi đã gặp sự cố tương tự, ở phần cuối, tôi đã phát hiện ra rằng chương trình không hoạt động nếu tên tệp có dấu gạch chéo / hoặc \, tôi thay thế / bằng _, nó đã hoạt động
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn vì điều này - Tiết kiệm thời gian tuyệt vời
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Làm việc như một sự quyến rũ, nhưng có cách nào để tạo các thư mục con không?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Đang thử điều này trên máy Mac và tôi nhận được "Lỗi thời gian chạy '68': Thiết bị không khả dụng" và nhấn gỡ lỗi sẽ chỉ ra dòng mã sau là thủ phạm: If Len (Dir (ActiveWorkbook.Path & "\" & Rng ( r, c), vbDirectory)) = 0 Sau đó MkDir (ActiveWorkbook.Path & "\" & Rng (r, c)) Vui lòng giúp đỡ.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi cũng muốn biết điều này. Tôi cần tạo các thư mục con với tên cụ thể đã được thêm vào. Ví dụ: Thư mục tên Excel \ P \ E Tôi cần hai thư mục bên trong thư mục P có tên là E và K.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn bạn rất nhiều vì bài viết hữu ích này, đã tiết kiệm thời gian của tôi. Tôi yêu mọt sách :) Chúng tôi sẽ làm gì nếu không có họ, nghiêm túc!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tôi đang cố gắng thêm nhiều cột với nhau khi tạo một thư mục. Có bất cứ đề nghị nào cho việc làm như thế này hả? ví dụ: ABC 1 A1 A2 A3 2 B1 B2 B3 3 C1 C2 C3 Sản phẩm cuối khi các thư mục được tạo sẽ là: Thư mục 1 (A1 + A2 + A3) Thư mục 2 (B1 + B2 + B3) Vv ... Tôi đã tìm thấy nhiều công thức trên tạo thư mục từ các ô đơn lẻ nhưng không có gì cho nhiều ô. Tôi cũng đã thử sửa đổi một vài thứ nhưng không thành công. Có ý kiến ​​gì không? Thanks
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Bạn thật tuyệt vời. Nó đã làm việc. Thanks.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Công việc tốt ..... xuất sắc
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn rất nhiều vì tab KUTOOLS & Enterprise này ...... công cụ tiết kiệm thời gian ..
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
bạn vừa tiết kiệm cho tôi rất nhiều thời gian
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn rất nhiều Dude ,,, nó đang hoạt động ...
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Chúc mừng! Chức năng tuyệt vời!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cám ơn vì cái này. hoạt động tốt
Không có bình luận nào được đăng ở đây
Tải thêm
Để lại ý kiến ​​của bạn
Đăng với tư cách khách
×
Đánh giá bài viết này:
0   Nhân vật
Các vị trí được đề xuất

Kết nối với chúng tôi

Bản quyền © 2009 - www.extendoffice.com. | Đã đăng ký Bản quyền. cung cấp bởi ExtendOffice. | BẢN ĐỒ CHI NHÁNH
Microsoft và logo Office là các nhãn hiệu hoặc nhãn hiệu đã đăng ký của Microsoft Corporation tại Hoa Kỳ và / hoặc các quốc gia khác.
Được bảo vệ bởi Sectigo SSL