【VBA】获取当前路径/获取上一级路径 

'获取当前路径
p = ThisWorkbook.Path
MsgBox (p)

'获取上一级路径
p = Mid(p, 1, InStrRev(p, "\"))
MsgBox (p)

　　

posted @ 2022-04-20 10:26  妖怪梧桐  阅读(1813)  评论(0)  编辑  收藏  举报