作者darklimit (Yu)
看板Visual_Basic
標題[VBA] 抓資料夾裡多個檔案
時間Mon Dec 13 16:04:05 2021
請問各位大神
目前程式是這樣寫
但只能抓取一個檔案
沒辦法選資料夾裡多個檔案
再請各位大神提供建議
謝謝
Dim FilePath As String
Dim Wb2 As WorkBook
FilePath = Application.GetOpenFilename
Set Wb2 = Workbooks.Open(FilePath)
Filename = Dir(“Wb2”)
Do While Filename <> “”
Workbooks.Open Filename:=Wb2 & File name, ReadOnly:=True
Loop
-----
Sent from JPTT on my iPhone
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 42.73.173.118 (臺灣)
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Visual_Basic/M.1639382647.A.EC3.html
1F：推 fisheater: 用FSO抓folder裡面的多個檔案 12/14 22:58
3F：→ darklimit: 感謝F大及L大的回覆，可以了 12/17 00:09