原网址:http://blog.sina.com.cn/s/blog_4aee288a0100d15q.html
Today I have met some problems on specifying a relative path into a excel vba header, linking a dll.You must specify a absolute one instead of the relative path.
For example:
Declare Function LoadProject Lib "C:\Program Files\AccessHist.dll" (ByVal projectpath As String) As Boolean
At last I found the solution, just put the dll in the same folder as the xls file and in the Workbook_open() function put the following:
chdrive(thisworkbook.path)
chdir(thisworkbook.path)
You can linking the dll like this way:
Declare Function LoadProject Lib "AccessHist.dll" (ByVal projectpath As String) As Boolean