نقل قول نوشته شده توسط __siavash__ مشاهده تاپیک
این کد هم این کارو میکنه :
Dim fs As FileSystemObject

Set fs = CreateObject("Scripting.FileSystemObject")

fs.CreateFolder ("F:\Test")

البته این کد هم همون معنی رو میده :
Dim fs As New FileSystemObject

fs.CreateFolder ("F:\test")

در ضمن یادت باشه گزینه Microsoft Scripting Runtime رو از منوی Project --> references
به پروژه اضافه بکنی

در ضمن FileSystemObject اشیا کاربردی دیگری هم داره که خودت میتونی تست کنی

از این قسمت ایراد میگیره :

fs As FileSystemObject