如何在VBA中获取excel文件名/路径
如何在VBA中获取excel文件名/路径
提问于 2009-12-13 13:12:04
比方说，我在我的excel文件sample.xls中写了一个VBA。现在，我想在我的VBA中获得sample.xls的完整路径。我该怎么做呢？
回答 7
Stack Overflow用户
回答已采纳
发布于 2009-12-13 17:57:49
如果您指的是VBA，那么您可以使用FullName，例如：
strFileFullName = ThisWorkbook.FullName(根据评论的考虑进行了更新:如果其他office文件可能是打开的(Ed)和活动的，则前者使用的ActiveWorkbook.FullName更有可能是错误的。但是，如果您将宏存储在另一个文件中，如user @user7296559 here所述，并且确实需要使用宏的文件的文件名，则ActiveWorkbook可能是正确的选择，前提是它在执行时是活动的。)
Stack Overflow用户
发布于 2017-03-13 17:44:34
这是一个简单的替代方案，它给出了所有响应，Fullname，Path，filename。
Dim FilePath, FileOnly, PathOnly As String
FilePath = ThisWorkbook.FullName
FileOnly = ThisWorkbook.Name
PathOnly = Left(FilePath, Len(FilePath) - Len(FileOnly))Stack Overflow用户
发布于 2009-12-13 13:18:46
strScriptFullname = WScript.ScriptFullName
strScriptPath = Left(strScriptFullname, InStrRev(strScriptFullname,"\")) 页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/1895616
复制相关文章
相似问题