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 vote269 views1 answer
Vba DisplayGridlines
VBA
0 vote173 views1 answer
Vba select file in folder
VBA
0 vote231 views1 answer
Change whcih control a user has selected vb
VBA
0 vote257 views1 answer
Excel vba first column in range
VBA
0 vote242 views1 answer
Set column width of datagridview vb.net
VBA
0 vote226 views1 answer
Vba leading zeros in string
VBA
0 vote241 views1 answer
Make all controls in an area not visable vb
VBA
1 vote240 views2 answers
Vba find last row in range for certain criteria
VBA
0 vote255 views1 answer
Visual stuiod not recognising desgined labels
VBA
2 votes225 views1 answer
Vba uppercase first letter of each word
VBA