社区 › VB › [VBA]在vba中怎样找当前路径？

weekendor 发表于 2005-6-29 20:27:00

[VBA]在vba中怎样找当前路径？

求教中.....
在vba中怎样找到我当前.dvb文件的路径所在呢？
目的：我是想在.dvb同一目录下读一数据库，但是找不到相关找当前路径的函数方法，烦恼ing...
（在VB中，可以用App.Path知道当前的路径，但是在的vba中好像不能用这个方法。。。　不知有无高招可指教指教）
迫切求救，请教各位大侠！

wyj7485 发表于 2005-6-30 14:31:00

Function GetSupportPath() As String
Dim strFileName
strFileName = VBE.ActiveVBProject.FileName 'VBE.ActiveVBProject.FileName获取.dvb文件的文件名
GetSupportPath = Left$(strFileName, InStrRev(strFileName, "\"))
End Function

weekendor 发表于 2005-6-30 22:03:00

谢谢你的回复！
我试试！　：）

weekendor 发表于 2005-6-30 22:10:00

成功！
感谢求助！　：）

zhenyy_hyz 发表于 2009-6-9 23:04:00

1楼的回复呢，？

查看完整版本: [VBA]在vba中怎样找当前路径？