返回列表 上一主題 發帖

[發問] 如何設定一個按鈕 開啟CSV檔案 不指定路徑

[發問] 如何設定一個按鈕 開啟CSV檔案 不指定路徑

如何設定一個按鈕 開啟CSV檔案 不指定路徑
小武

如何設定一個按鈕 開啟CSV檔案 不指定路徑
show5217 發表於 2018-12-1 07:47


http://forum.twbts.com/viewthrea ... D%B1%D2%C0%C9%AE%D7

TOP

  1. Sub zz()
  2. With Application.FileDialog(3)
  3.     .Title = "Open csv files"
  4.     .Filters.Add "CSV files", "*.csv", 1
  5.     .Show
  6.     If .SelectedItems.Count Then Workbooks.Open .SelectedItems(1)
  7. End With
  8. End Sub
複製代碼

TOP

回復 3# ikboy


    謝謝大大
小武

TOP

回復 3# ikboy
如果要寫在命令按鈕裡面呢
小武

TOP

回復 5# show5217


  滑鼠右鍵>指定巨集
程式是依需求寫的,需求表達不清楚
或者沒有上傳附件,愛莫能助

TOP

回復 6# n7822123


    意思應該是說如果不用巨集的方式
小武

TOP

如圖步驟:1. 所有檔案  2. *.csv  3. 回車
系統會過濾所有csv檔案出來給選擇。
zz.PNG

TOP

        靜思自在 : 做好事不能少我一人,做壞事不能多我一人。
返回列表 上一主題