前言：
如今看官们对“vba获取文件夹内的文件名”大约比较着重，姐妹们都想要知道一些“vba获取文件夹内的文件名”的相关资讯。那么小编也在网摘上搜集了一些关于“vba获取文件夹内的文件名””的相关内容，希望咱们能喜欢，你们快快来了解一下吧！一个文件完整的名称包含主名称和扩展名两部分。
比如“Excel笔记.xlsm”中，“Excel笔记.xlsm”是这个文件完整的名称，而“Excel笔记”是它的主名称，“xlsm”是它的扩展名。
怎样用VBA获得这些信息呢？
获得文件完整的名称
要获得一个Excel文件的完整名称，可以读取它的Name属性，如果想获得代码所在工作簿的名称，可以用下面的代码：
Sub 获取文件全名1() MsgBox ThisWorkbook.NameEnd Sub
当然，也可以用下面的代码：
Sub 获取文件的全名2() Dim fso As Scripting.FileSystemObject Dim myFile As String myFile = ThisWorkbook.FullName Set fso = New Scripting.FileSystemObject MsgBox "该文件的全名为:" & fso.GetFileName(myFile) Set fso = NothingEnd Sub获得文件的主名称
参照前面获得完整名称的第二种方法，要想获得一个文件的主名称，可以用下面的过程：
Sub 获取文件的主名称() Dim fso As Scripting.FileSystemObject Dim myFile As String myFile = ThisWorkbook.FullName Set fso = New Scripting.FileSystemObject MsgBox "该文件的基础名称为:" & fso.GetBaseName(myFile) Set fso = NothingEnd Sub获得文件的扩展名
要获得文件的扩展名，也是相同的思路。
Sub 获取文件的扩展名() Dim fso As Scripting.FileSystemObject Dim myFile As String myFile = ThisWorkbook.FullName Set fso = New Scripting.FileSystemObject MsgBox "该文件的扩展名为:" & fso.GetExtensionName(myFile) Set fso = NothingEnd Sub
代码很简单，你学会了吗？
关注“Excel笔记”，学更多Excel技巧。
版权声明：
本站文章均来自互联网搜集，如有侵犯您的权益，请联系我们删除，谢谢。
标签： #vba获取文件夹内的文件名 #vba获取文件名称
