1
2
3
4
5
|
Sub ?s() ???? Dim ?pth$ ???? pth?=?ThisWorkbook.Path ???? MsgBox? "本文件的路径为:" ?&?pth End ?Sub |
转载请注明出处:
未经允许不得转载:lxfamn » vba 获取当前文件路径
1
2
3
4
5
|
Sub ?s() ???? Dim ?pth$ ???? pth?=?ThisWorkbook.Path ???? MsgBox? "本文件的路径为:" ?&?pth End ?Sub |
转载请注明出处:
未经允许不得转载:lxfamn » vba 获取当前文件路径