我需要設置Excel工作表的路徑，以便我可以使用相對路徑來加載DLL

我的Excel電子表格工作正常時，當DLL有一個絕對路徑，但當它在同一目錄中，我不' t指定一個路徑，只需將該dll的名稱，它找不到它。我需要設置Excel工作表的路徑，以便我可以使用相對路徑來加載DLL

當我嘗試

Debug.Print CurDir 
C:\TEMP\TestAPSOutput\Simple2Room

但是，這是不對的。我怎樣才能重置這個指向實際電子表格的目錄，因此希望加載DLL？

謝謝，詹姆斯

來源

2012-01-03 James

嘗試：

Dim PathCrnt As String 

PathCrnt = Application.ActiveWorkbook.Path

我用這一切的時候發現我已經放在同一文件夾中的工作簿文件。

來源

2012-01-03 18:19:12

嗨，謝謝你的回覆。問題是我如何使用它來加載dll。我不需要將它放在worksheet_open方法中，然後使用PathCrnt來設置系統變量。我已經嘗試過建立字符串公共聲明PtrSafe函數SetSourceDescription庫「MyDll.dll」（BYVAL鍵作爲字符串）只要我使用Excel 2010 64位 – James 2012-01-04 09:39:51

對不起，但其他人將不得不幫助你下一個你的問題的一點點。 – 2012-01-04 09:48:11

使用chdir解決ActiveWorkbook.Path要小心諸如加載文件之類的事情，因爲這可以將當前目錄從它應該存在的地方拉開。 – James 2012-01-04 10:18:53

我需要設置Excel工作表的路徑，以便我可以使用相對路徑來加載DLL

回答

相關問題