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 vote223 views1 answer
Vba sort the data Z to A
VBA
0 vote219 views1 answer
Excel vba urlmon
VBA
9 votes268 views2 answers
Excel vba convert 2 Short integers to a Long integer
VBA
0 vote218 views1 answer
Power query M substract minimum value of column -dax
VBA
-1 vote195 views1 answer
System.Data.OleDb.OleDbException: 'No value given for one or more required parameters.'
VBA
1 vote225 views1 answer
Vba ubound array 2-dimensional
VBA
1 vote209 views1 answer
Excel vba close form escape key
VBA
0 vote219 views1 answer
Build an index all files of a FTP site
VBA
0 vote224 views1 answer
Excel vba textbox forecolor disabled
VBA
0 vote220 views1 answer
Find database connection string vb
VBA