Option Explicit
Sub createFolder()
On Error Resume Next
‘create folder with vba
VBA.MkDir ("D:\Excel\VBA_Example")
End Sub本文出自 “Study” 博客，请务必保留此出处http://mstudy.blog.51cto.com/3203813/1663582
原文：http://mstudy.blog.51cto.com/3203813/1663582