'文件名(不带路径) ABC.xlsx
ThisWorkbook.Name
'文件名不带扩展名 ABC
Left(ThisWorkbook.Name, InStr(ThisWorkbook.Name, ".") - 1)
'带全路径的文件名 C:\Folder\ABC.xlsx
ThisWorkbook.Path & "\" & thisworkbook.Name
版权声明:本文为jyh_jack原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接和本声明。
'文件名(不带路径) ABC.xlsx
ThisWorkbook.Name
'文件名不带扩展名 ABC
Left(ThisWorkbook.Name, InStr(ThisWorkbook.Name, ".") - 1)
'带全路径的文件名 C:\Folder\ABC.xlsx
ThisWorkbook.Path & "\" & thisworkbook.Name