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 vote124 views1 answer
Hello world vb.net
VBA
0 vote133 views1 answer
Vba horizontalalignment
VBA
0 vote142 views1 answer
Excel vba set cell value to empty
VBA
0 vote128 views1 answer
Vba sort the data Z to A
VBA
0 vote160 views2 answers
VB
VBA
7 votes147 views1 answer
Excerl vba array to range
VBA
0 vote133 views1 answer
Return na vba
VBA
0 vote138 views1 answer
Regex numeric digits
VBA
0 vote131 views1 answer
String contins in vba
VBA
4 votes128 views2 answers
Excel vba last column with data
VBA