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

Làm cách nào để liệt kê nhanh tên ảnh / tên tệp của thư mục vào ô Excel?

Trong hướng dẫn này, tôi sẽ cung cấp một số thủ thuật để liệt kê nhanh tất cả các tên ảnh hoặc tên tệp của một thư mục cụ thể trong một trang tính Excel như hình minh họa.

DI CHUYỂN NHANH

Liệt kê tên ảnh của một thư mục trong Excel với VBA
Liệt kê tên ảnh hoặc tên tệp định dạng cụ thể của một thư mục trong Excel với Danh sách tên tệp
Tải xuống tệp mẫu

doc danh sách tên ảnh 1

Liệt kê tên ảnh của một thư mục trong Excel với VBA

Trong Excel, không có chức năng tích hợp nào có thể tự động liệt kê tất cả các tên ảnh của thư mục bạn chọn trong một ô của trang tính, nhưng ở đây tôi có mã VBA có thể giúp bạn giải quyết nhanh công việc này.

1. Trong Excel, sau đó nhấn + chìa khóa để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Trong cửa sổ bật lên, nhấp vào Chèn > Mô-đun để tạo một tập lệnh Mô-đun mới.

3. Sao chép mã bên dưới và dán chúng vào cửa sổ tập lệnh Mô-đun mới.

Sub PictureNametoExcel()
'UpdatebyExtendoffice 
    Dim I As Long
    Dim xRg As Range
    Dim xAddress As String
    Dim xFileName As String
    Dim xFileDlg As FileDialog
    Dim xFileDlgItem As Variant
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Select a cell to place name list:", "Kutools For Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    Set xRg = xRg(1)
    xRg.Value = "Picture Name"
    With xRg.Font
    .Name = "Arial"
    .FontStyle = "Bold"
    .Size = 10
    End With
    xRg.EntireColumn.AutoFit
    Set xFileDlg = Application.FileDialog(msoFileDialogFolderPicker)
    I = 1
    If xFileDlg.Show = -1 Then
        xFileDlgItem = xFileDlg.SelectedItems.Item(1)
        xFileName = Dir(xFileDlgItem & "\")
        Do While xFileName <> ""
            If InStr(1, xFileName, ".jpg") + InStr(1, xFileName, ".png") + InStr(1, xFileName, ".img") + InStr(1, xFileName, ".ioc") + InStr(1, xFileName, ".bmp") > 0 Then
                xRg.Offset(I).Value = xFileDlgItem & "\" & xFileName
                I = I + 1
            End If
            xFileName = Dir
        Loop
    End If
    Application.ScreenUpdating = True
End Sub

4. nhấn F5 , sau đó một hộp thoại bật ra để bạn chọn một ô để đặt tên ảnh.
doc danh sách tên ảnh 1

5. nhấp chuột OK để tiếp tục chọn thư mục bạn muốn liệt kê tên ảnh trong hộp thoại Duyệt qua.
doc danh sách tên ảnh 3

6. nhấp chuột OK, bây giờ tất cả các tên ảnh trong thư mục đã chọn đã được liệt kê trong Excel.
doc danh sách tên ảnh 13

LƯU Ý Trong mã VBA, bạn có thể jpg / png /… trong chuỗi mã Nếu InStr (1, xFileName, ".jpg") + InStr (1, xFileName, ".png") + InStr (1, xFileName, ".img") + InStr (1, xFileName, ".ioc") + InStr (1, xFileName, ".bmp") > 0 Sau đó vào phần mở rộng tệp bạn cần, ví dụ: nếu bạn muốn liệt kê tên tệp của tệp ở định dạng doc, chỉ thay đổi chuỗi mã thành Nếu InStr (1, xFileName, ".doc")> 0 Thì.

Nếu bạn thường cần liệt kê một hoặc tất cả các tên tệp định dạng của một thư mục trong ô Excel trong công việc hàng ngày của mình, thì mã này phức tạp và không dễ xử lý, nhưng với cách dưới đây, bạn có thể nhanh chóng giải quyết công việc này.


không di chuyển

Bạn Có Muốn Tăng Lương và Có Nhiều Thời Gian Để Đồng Hành Với Gia Đình Không?

Tab Office Nâng cao hiệu quả của bạn lên 50% trong Microsoft Office Đang hoạt động ngay bây giờ

Thật không thể tin được, làm việc với hai hoặc nhiều tài liệu dễ dàng và nhanh hơn so với làm việc cùng một lúc.

So với các trình duyệt nổi tiếng, công cụ theo thẻ trong Office Tab mạnh hơn và hiệu quả hơn.

Giảm hàng trăm lần click chuột và gõ bàn phím mỗi ngày cho bạn, nói lời tạm biệt với bàn tay chuột ngay bây giờ.

Nếu bạn thường làm việc với nhiều tài liệu, Office Tab sẽ là một công cụ tiết kiệm thời gian tuyệt vời cho bạn.

30-ngày dùng thử miễn phí, Không cần thẻ tín dụng.

Tìm hiểu thêmTải về miễn phí ngay bây giờ


Liệt kê tên ảnh hoặc tên tệp định dạng cụ thể của một thư mục trong Excel với Danh sách tên tệp

Đây là một tiện ích - Danh sách tên tệp in Kutools cho Excel, có thể

>> liệt kê tất cả các tên tệp ở tất cả các định dạng tệp của một thư mục trong một trang tính mới;

>> liệt kê tên tệp trong một hoặc một số định dạng tệp bạn chỉ định cho Excel;

>> liệt kê tên tệp bao gồm các thư mục con và các tệp và thư mục ẩn trong Excel.

Nói Lời Tạm Biệt Với ​​Tay Chuột và Thoái hóa đốt sống Cổ ngay

300 công cụ nâng cao của Kutools cho Excel giải quyết 80% Các tác vụ Excel trong vài giây, kéo bạn ra khỏi hàng nghìn lần nhấp chuột.

Dễ dàng giải quyết 1500 tình huống làm việc, không cần mất thời gian tìm kiếm giải pháp, có nhiều thời gian để tận hưởng cuộc sống của bạn.

Cải thiện 80% năng suất cho 110000+ người hiệu quả cao mỗi ngày, tất nhiên bao gồm cả bạn.

Không còn bị dày vò bởi những công thức và VBA đau đớn, hãy cho não của bạn được nghỉ ngơi và tâm trạng làm việc vui vẻ.

30-ngày dùng thử miễn phí với đầy đủ tính năng, 30-ngày hoàn tiền mà không cần lý do.

Một Cơ Thể Tốt Hơn Tạo Một Cuộc Sống Tốt Đẹp Hơn.

Sau khi cài đặt miễn phí Kutools cho Excel, vui lòng làm như sau:

1. Bật sổ làm việc bạn muốn liệt kê tên tệp, sau đó nhấp vào Kutools Plus > Import / Export > Danh sách tên tệp.
doc danh sách tên ảnh 4

2. bên trong Danh sách tên tệp trước tiên, hãy nhấp vào  doc danh sách tên ảnh 5 để chọn một thư mục mà bạn muốn liệt kê tên tệp của nó, sau đó bạn có thể đánh dấu vào các hộp kiểm của Bao gồm các tệp trong thư mục con Bao gồm các tệp và thư mục ẩn như bạn cần.
doc danh sách tên ảnh 6

3. Sau đó, chọn định dạng tệp bạn muốn liệt kê tên trong Loại tệp phần.

kiểm tra Tất cả các file tùy chọn, nó sẽ liệt kê tất cả các tên tệp ở tất cả các định dạng tệp trong thư mục đã chọn
doc danh sách tên ảnh 7
kiểm tra Chung và chọn định dạng tệp cụ thể mà bạn muốn liệt kê các tên tệp từ danh sách thả xuống, sau đó nó sẽ liệt kê tất cả các tên tệp của định dạng tệp bạn chọn trong danh sách thả xuống
doc danh sách tên ảnh 8
kiểm tra Chỉ định tùy chọn, sau đó nhập các phần mở rộng tệp (sử dụng dấu phẩy để phân tách chúng) mà bạn muốn liệt kê tên tệp trong hộp văn bản, sau đó nó sẽ chỉ liệt kê các tên tệp có phần mở rộng tệp nhập trong Excel
doc danh sách tên ảnh 9

4. Chọn đơn vị kích thước bạn cần từ danh sách thả xuống trong Đơn vị kích thước tệp , nếu bạn muốn tạo liên kết đến tên tệp, hãy kiểm tra Tạo siêu liên kết tùy chọn.

doc danh sách tên ảnh 10 doc danh sách tên ảnh 11

5. nhấp chuột Ok, một trang tính mới sẽ được tạo để liệt kê tên tệp và một số thông tin về tệp.
doc danh sách tên ảnh 12

Mẹo: nếu bạn muốn liệt kê tất cả các tên trang tính trong Excel, bạn có thể áp dụng Kutools cho Excel ' Tạo danh sách tên trang tính tiện ích, nó sẽ tạo một trang tính mới để liệt kê tất cả các tên trang tính có thể liên kết.
tạo danh sách tên trang tính

Kutools cho Excel: + các công cụ tiện dụng hữu ích, đơn giản hóa các tác vụ phức tạp trong Excel thành một vài cú nhấp chuột.


Tải xuống tệp mẫu

mẫu


Làm thế nào để bạn trở nên nổi bật giữa đám đông, dễ dàng làm việc và tận hưởng cuộc sống nhàn nhã?

Kutools cho Excel trung bình sẽ cải thiện 80% hiệu quả của bạn mỗi ngày, giúp bạn có nhiều thời gian để đồng hành cùng gia đình và vui vẻ trong cuộc sống.

300 công cụ tiên tiến giải quyết 80% Các bài toán về Excel, bạn không còn loay hoay tìm kiếm lời giải, dễ dàng hoàn thành công việc hơn.

Dễ dàng xử lý 1500 tình huống Excel, tiết kiệm ít nhất 1 giờ cho bạn mỗi ngày.

Trở thành chuyên gia Excel trong 5 phút, được mọi người công nhận và có cơ hội thăng tiến.

Tiện ích một cú nhấp chuột xử lý xử lý hàng loạt, cho phép bạn tránh hàng nghìn lần nhấp chuột, tạm biệt với tay chuột.

Thoát khỏi các công thức học thuộc lòng và VBA phức tạp, cho não của bạn nghỉ ngơi.

110000+ nhân viên hiệu quả cao và hơn 300 công ty nổi tiếng thế giới được lựa chọn.

Chỉ mất $ 39 nhưng đáng giá hơn $ 4000 đào tạo của người khác

30 ngày dùng thử miễn phí mà không có bất kỳ giới hạn nào, hoàn lại toàn bộ tiền trong 30-ngày mà không có bất kỳ lý do.

Bây giờ, giành được cuộc sống tốt hơn của bạn Tìm hiểu thêm Miễn phí 30-Ngày dùng thử Mua ngay

Các công cụ năng suất được đề xuất

Tab Office - Duyệt theo tab, chỉnh sửa, quản lý tài liệu trong Microsoft Office 2019 - 2003 và Office 365


tab văn phòng

Một bổ trợ chuyên nghiệp để tăng tốc Excel 2019-2007, thu nhỏ nhiệm vụ hàng giờ xuống còn giây

Phần bổ trợ này bao gồm hàng chục nhóm chuyên nghiệp, với hơn 300 tùy chọn sẽ tự động hóa hầu hết các công việc hàng ngày của bạn trong Excel và tăng năng suất của bạn lên ít nhất 50%. Chẳng hạn như nhóm lựa chọn một lần nhấp và chuyển đổi hàng loạt.
Bây giờ là cơ hội để bạn tăng tốc bản thân với Kutools cho Excel!


Nhận xét (10)
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
Có thể có gì đó sai với mã? Bởi vì nó hiển thị các thư mục chứa đầy hình ảnh (.png) như trống khi nó kéo hộp lên để chọn ảnh.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Có thể có một cái gì đó sai với mã? Trình khám phá tệp đang hiển thị thư mục chứa đầy hình ảnh (.png) của tôi là trống.
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Ó CÙNG TÂN TỬ VẤN ĐỀ, TRONG KHOẢNG CÁCH NÓ CÓ CÁC PHẦN MỞ RỘNG TẬP TIN KHÁC NHAU ĐẾN GRAB, BẠN PHẢI CHỮ HOA CHO TIỆN ÍCH MỞ RỘNG MÀ TÔI TÌM KIẾM, VÍ DỤ, BẠN NÓI TÀI LIỆU CỦA BẠN LÀ ".png", TỐT HƠN NẾU BẠN VỐN HÓA IT IE ".PNG" CÓ THỂ 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
Bây giờ nó làm việc cho tôi. 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ách xuất một hình ảnh với tên tệp cụ thể trong excel.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Chào,
Theo đoạn mã trên, tôi nhận được tên hình ảnh theo thứ tự tăng dần, tuy nhiên đường dẫn nơi các hình ảnh đang được đặt theo số tăng dần.

Vui lòng đề xuất cách tôi có thể giữ nguyên định dạng.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Kinh ngạc! Cảm ơn bạn đã chia sẻ!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Trong Libreoffice Calc, tôi sử dụng chức năng nhập danh sách tệp vào các hàng / cột của bảng Calc, thông qua Macro và dựa trên các tiêu chí nhất định - Tôi đã tạo một nút trên thanh công cụ cho macro cụ thể này và sau khi nhấn nó, tôi chọn một thư mục, và danh sách hình ảnh sẽ được chèn ngay lập tức vào một tài liệu mới. Làm thế nào để làm cho nó dễ dàng nhất có thể trong Excel? Tôi có rất nhiều thư mục chứa 1 hoặc nhiều hình ảnh và tôi cần:
> Nếu thư mục chứa 1 hình ảnh, tôi cần nó nằm trên một dòng mới trong Excel.
> Nếu thư mục chứa nhiều hình ảnh hơn, hình ảnh đầu tiên nằm trên một dòng mới và hình ảnh thứ hai:
- bên cạnh chữ đầu tiên trong cùng một hàng (trong một cột), được phân tách bằng ký tự | (ví dụ: ảnh 1.jpeg | ảnh 2.jpeg)
- hoặc có tên của họ trong các cột (ngay cả khi không có ký tự |) (tùy chọn đầu tiên sẽ tốt hơn, nhưng tùy chọn thứ hai cũng đủ)

Đây là những hình ảnh sản phẩm có tên tôi cần nhập vào Woocommerce - thông qua tệp csv.
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 cho việc này!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Chào! Đây là siêu nhanh và cảm ơn
Không có bình luận nào được đăng ở đây
Để 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