VB腳本找到當前位置？

我在文件夾C bp.xlsm文件：\ TF \ ExcellLaunchVB腳本找到當前位置？

在bp.xlsm文件，Sheet1中，我有一個按鈕。當我點擊按鈕時，我應該得到路徑C：\ tf \ ExcellLaunch。

我使用下面的代碼：

Set WshShell = CreateObject("WScript.Shell") 

strCurDir = WshShell.currentDirectory 

MsgBox (strCurDir)

我來到這裏是c：\ UERS \ MYNAME \文件

問題 - 如何找到bp.xlsm的VB腳本文件路徑？預計產量爲C：\ TF \ ExcellLaunch（不是C：\ UERS \ MYNAME \文件）

VBScript和工作表之間的鏈接是什麼？如果您的意思是* VBA *工作簿具有'Path'屬性，例如'ActiveWorkbook.Path' –

就是這樣。謝謝。 – user1606275

嘗試下面的代碼，它會給你當前的位置 -

Private Sub CommandButton1_Click() 

MyFullName = ThisWorkbook.FullName 

MsgBox (MyFullName) 

End Sub

問候的路徑尼廷

2014-03-12 16:38:15

回答