VBA提取当前工作簿所在文件夹的名称?

2025-04-13 10:09:54
推荐回答(2个)
回答(1):

sub t()
dim str
str=ThisWorkbook.Path
MsgBox Right(str, Len(str) - InStrRev(str, "\"))
end sub

用路径整理下就是文件夹了啊~

回答(2):

[a1]=thisworkbook.path