Sub test2()
Dim Fso As Object, oFile As Object, downloadpathfile$, filepath$, sFolder$, t$
downloadpathfile = [B5].Value & "\"
t = [B3].Value
Set Fso = CreateObject
VBA创建文件夹,根据文件名创建文件夹
最新推荐文章于 2024-01-19 11:24:14 发布
Sub test2()
Dim Fso As Object, oFile As Object, downloadpathfile$, filepath$, sFolder$, t$
downloadpathfile = [B5].Value & "\"
t = [B3].Value
Set Fso = CreateObject