麻辣家族討論版版 - Powered by Discuz! Board

標題: [發問] 如何將VBA的路徑改指定到EXCEL上，好方便讓使用者更改。 [打印本頁]

作者: RCRG 時間: 2019-1-30 09:50 標題: 如何將VBA的路徑改指定到EXCEL上，好方便讓使用者更改。

請問我寫一個自動開啟，再關閉指定excel檔的VBA(如下)，如何讓VBA內的路徑改寫在EXCEL上 (讓user自己能隨意更改路徑用)呢???
另外想問一下，像這樣自動開啟再關閉，但我指定的excel開啟可能要跑個30-60秒，這樣他關閉的話，是會等excel完全開啟後再關，還是開啟馬上就又強制關了呢(我怕程序沒跑完就被強制關了)

以上有勞大師求解，謝謝!!

Private Sub Workbook_Open()
Workbooks.Open Filename:="D:\Users\AAA\Desktop\BBB.xls", UpdateLinks:=1
Workbooks("BBB.xls").Close SaveChanges:=False
Application.Quit
End Sub

作者: Hsieh 時間: 2019-1-30 16:22

回復 1# RCRG
以你目前程式碼是開啟檔案後再不儲存修改關閉檔案，並且關閉EXCEL
那麼開檔時間一點關係也沒有啊
要讓使用者更改開啟檔案路徑方法不只一個
最簡單的用開啟舊檔對話方塊

Sub ex()
fs = Application.GetOpenFilename
With Workbooks.Open(fs)
'在此區段寫入你想對被開啟檔案執行的動作
.Close 1 '儲存變更後關閉檔案
End With
Application.Quit '離開EXCEL
End Sub

複製代碼

作者: RCRG 時間: 2019-1-30 16:55

回復 RCRG
以你目前程式碼是開啟檔案後再不儲存修改關閉檔案，並且關閉EXCEL
那麼開檔時間一點關係也沒 ...
Hsieh 發表於 2019-1-30 16:22

我開啟雖然沒有存檔，但是會跑一段巨集，跑完後關閉，我是怕關太快會影響巨集，但我後來觀察似乎不會，似乎會等系統跑完後才會關閉；

我想把路徑寫在vexcel欄位內，並用VBA抓路徑，這樣使用者才不會每次開檔都要選一次欄位，不知能否幫忙改成如此呢? 謝謝

作者: RCRG 時間: 2019-1-30 16:55

回復 RCRG
以你目前程式碼是開啟檔案後再不儲存修改關閉檔案，並且關閉EXCEL
那麼開檔時間一點關係也沒 ...
Hsieh 發表於 2019-1-30 16:22

更正錯字連篇...XD
我開啟雖然沒有存檔，但是會跑一段巨集，跑完後關閉，我是怕關太快會影響巨集，但我後來觀察似乎不會，似乎會等系統跑完後才會關閉；

我想把路徑寫在excel欄位內，並用VBA抓路徑，這樣使用者才不會每次開檔都要選一次路徑，不知能否幫忙改成如此呢? 謝謝

歡迎光臨麻辣家族討論版版 (http://forum.twbts.com/)