Vba create directory

'requires reference to Microsoft Scripting Runtime
Function MkDir(ByVal strDir As String, ByVal strPath As String)
  	Dim fso As New FileSystemObject
  	Dim path As String
	path = strPath & strDir
	If Not fso.FolderExists(path) Then
	    fso.CreateFolder path
	End If
End Function

Source: stackoverflow.com

Similar codes

0 vote226 views1 answer
Vba remove numbers from string
VBA
0 vote202 views1 answer
Add Formula to Shape Text in VBA
VBA
-1 vote206 views1 answer
For i in range vba
VBA
4 votes221 views1 answer
Excel vba determine number of elements in an array
VBA
0 vote234 views1 answer
Vba horizontalalignment
VBA
0 vote161 views1 answer
How to make a if statement with vbs
VBA
1 vote226 views1 answer
Add rows to datagridview vb.net
VBA
0 vote229 views3 answers
Write to text file vb.net
VBA
0 vote209 views1 answer
Vba exit while
VBA
0 vote242 views1 answer
Vbs run with cscript
VBA