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

2 votes366 views2 answers
Excel vba if sunday or staurday
VBA
0 vote348 views1 answer
Vba check 32 or 64 bit
VBA
4 votes331 views1 answer
Excel vba Imitating the "IN" operator from python
VBA
0 vote322 views1 answer
Vba file size
VBA
0 vote334 views1 answer
Limit combobox to list vba
VBA
0 vote360 views2 answers
Excel vba number format file size
VBA
0 vote339 views1 answer
Excel vba move down to next visible cell
VBA
0 vote345 views1 answer
VBA Loop to range
VBA
0 vote330 views1 answer
Excel vba disable keyboard input
VBA
0 vote360 views1 answer
Vbnet convert charatcer to binary
VBA