返回列表 上一主題 發帖

[發問] 如何取得已經有的FolderBrowserDialog值

回復 4# z15935712
用迴圈開啟每個檔案

f = Dir(TextBox1 & "\*xls*")
Do Until f = ""
fs = TextBox1 & "\" & f
xlApp.Workbooks.Open fs
f = Dir
Loop
學海無涯_不恥下問

TOP

        靜思自在 : 發脾氣是短暫的發瘋。
返回列表 上一主題