VBA根据文件名字自动创建文件夹,创建文件夹,截取文件名,
Sub test()
Dim Fso As Object, oFile As Object, allpathfile$, filepath$, sFolder$, t$
allpathfile = [B1].Value & "\"
t = [B3].Value
Set Fso = CreateObject("Scripting.FileSystemObje...
原创
2020-04-24 21:19:14 ·
1339 阅读 ·
0 评论