lấy tên các file trong folder vào 1 sheet
- Thread starter lightd
- Ngày gửi
be_09
Biên Hòa, Đồng Nai
- Tham gia
- 9/4/11
- Bài viết
- 9,973
- Được thích
- 9,870
- Nghề nghiệp
- Công chức
các bác cao thủ giúp em với , tình hình em có 1 folder hơn 100 file giờ sếp muốn làm list tên các file đó vào 1 sheet Excel bác nào giúp em với ạ.
VBA viết như thế nào ạ
Tặng bạn File này dùng thử, cách sử dụng:
- Mở File, nhấn nút Tìm ổ dĩa và chọn thư mục chứa File bạn cần lấy Link, xong nhấn nút OK.
- Tiếp theo bạn nhấn nút Lấy Link và hiện tên File trong sheet, vậy là xong.
Bây giờ bạn muốn mở File nào thì click vào chữ Click mo File (từ G9 trở xuống tùy theo số File bạn có chứa trong thư mục).
Upvote
0
Bạn xem file này nha.
Upvote
0
minhsonndl
Thành viên mới
- Tham gia
- 20/1/10
- Bài viết
- 3
- Được thích
- 3
Xin code
Chào bạn lhthai bạn có thể post lại file Macrolinkfile.rar mà không có pass được không bạn. Mình cũng đang muốn tìm hiểu code viết để học hỏi. thanks bạn.
Upvote
0
doveandrose
hello
- Tham gia
- 3/7/09
- Bài viết
- 2,372
- Được thích
- 2,262
Mã:
Public Sub hell()
Dim objFSO As Object, objFolder As Object, objFile As Object
Dim arr(1 To 100000, 1 To 3) As Variant, k As Long
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder("D:\")
For Each objFile In objFolder.Files
k = k + 1
arr(k, 1) = k
arr(k, 2) = objFile.Name
arr(k, 3) = Left(objFile.DateLastModified, 10)
Next
If k > 0 Then Sheet1.Range("B2").Resize(k, 3).Value = arr
End Sub
Upvote
0
minhsonndl
Thành viên mới
- Tham gia
- 20/1/10
- Bài viết
- 3
- Được thích
- 3
Cám ơn bạn nhiều. Nhưng mình copy mà nó không chạy đc. Mình mới bắt đầu học VB thôi. Ngoài ra mình muốn tìm file ở bất kỳ thư mục nào. Mong bạn chỉ giáo thêm. tks
Upvote
0
doveandrose
hello
- Tham gia
- 3/7/09
- Bài viết
- 2,372
- Được thích
- 2,262
vậy mình cũng hết cách rồi bạn ơi . ở trên bạn liên lạc với ai thì bạn tiếp tục chờ người đó vậy . mình "chạy" trước
Upvote
0
minhsonndl
Thành viên mới
- Tham gia
- 20/1/10
- Bài viết
- 3
- Được thích
- 3
ok. Cám ơn bạn. Mình đã tìm ra. post cho ai cần như mình. Xin phép tác giả nhé. có lẽ code này lâu rồi bác cũng ko cần giữ bí mật nữa đâu nhỉ.
Upvote
0
dynamic503
Thành viên chính thức
- Tham gia
- 18/5/09
- Bài viết
- 57
- Được thích
- 5
làm sao lấy thêm tên thư mục gốc chứa file đó các bác nhỉ?
Upvote
0
dynamic503
Thành viên chính thức
- Tham gia
- 18/5/09
- Bài viết
- 57
- Được thích
- 5
Ý mình là thư mục mẹ chứa file
Upvote
0
dynamic503
Thành viên chính thức
- Tham gia
- 18/5/09
- Bài viết
- 57
- Được thích
- 5
làm ơn giúp, file này sẽ thành hoàn hảo với mình (sử dụng vì mục đíc công việc), Thanks
Upvote
0
dynamic503
Thành viên chính thức
- Tham gia
- 18/5/09
- Bài viết
- 57
- Được thích
- 5
ý mình chỉ lấy tên folder "Picture" trong ví dụ trên bác ạ
Cũng với file trên mà mình chỉ muốn lấy danh sách của những file có đuôi .xls và từ ngày đến ngày thì sửa thế nào bác?
Thanks
Upvote
0
dynamic503
Thành viên chính thức
- Tham gia
- 18/5/09
- Bài viết
- 57
- Được thích
- 5
Alo, Plz help. Thank you!!!
Upvote
0
dynamic503
Thành viên chính thức
- Tham gia
- 18/5/09
- Bài viết
- 57
- Được thích
- 5
Mình có sửa lại code để lấy tên file không kèm phần mở rộng, và lấy phần mở rộng của file. Mà sao nó chỉ hiển thị mỗi 1 vài folder còn các folder khác không hiện được tên file và ext ? nhờ sửa giúp
với các bác sửa giúp em hàm replace để lấy tên folder mẹ của file luôn, thanks (ko lấy full đường dẫn)
Làm thế nào thêm điều kiện chỉ tìm file có ext do mình chọn (VD như *.csv) và có kiểu số chằng hạn (VD file có tên 10.235.235.csv)
với các bác sửa giúp em hàm replace để lấy tên folder mẹ của file luôn, thanks (ko lấy full đường dẫn)
Làm thế nào thêm điều kiện chỉ tìm file có ext do mình chọn (VD như *.csv) và có kiểu số chằng hạn (VD file có tên 10.235.235.csv)
Lần chỉnh sửa cuối:
Upvote
0
Chia sẻ với các bạn 1 tool lấy danh sách file trong thư mục. Code chủ yếu là tìm trên mạng và mình chỉnh sửa thêm cho phù hợp với mục đích cá nhân. File không khóa pass để các bạn tiện tham khảo.
mình đã test với thư mục khoảng 80.000 file, list ra trong chưa đầy 2 phút.
mình đã test với thư mục khoảng 80.000 file, list ra trong chưa đầy 2 phút.
Upvote
0
doveandrose
hello
- Tham gia
- 3/7/09
- Bài viết
- 2,372
- Được thích
- 2,262
ồ cảm ơn bạn . Mình đang cần tìm hiểu mà chưa làm được , may nhờ có bài viết của bạn đã giúp mình rất nhiều
Upvote
0
dynamic503
Thành viên chính thức
- Tham gia
- 18/5/09
- Bài viết
- 57
- Được thích
- 5
Cảm ơn bạn rất nhiều, nhưng trình độ mình có hạn, mà mình lại muốn thêm cột tên file (không gồm ext), loại file (đuôi file ví dụ .csv), thư mục mẹ (Không phải cả tên đường dẫn)
Nâng cao hơn là chỉ lấy danh sách những file có tên là dạng số (VD: 1.2362.523.csv) cong những file không phải dạng số (VD: 12.0125.23_tẻm.csv thì không lấy)
Thanks
Upvote
0
mong bạn chỉ giáo thêmồ cảm ơn bạn . Mình đang cần tìm hiểu mà chưa làm được , may nhờ có bài viết của bạn đã giúp mình rất nhiều
Upvote
0
