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 vote116 views1 answer
Excel vba disable copy paste
VBA
0 vote119 views1 answer
Excel vba copy entire sheet paste values
VBA
1 vote129 views1 answer
Excel vba convert text YYYYMMDD to date
VBA
-1 vote150 views1 answer
Code for reading letters only in vb 6
VBA
0 vote116 views1 answer
Vbnet line graph smooth lines
VBA
5 votes77 views1 answer
Vba array worksheet.index
VBA
1 vote116 views1 answer
Excel vba compare 2 rows
VBA
0 vote75 views1 answer
How to make a if statement with vbs
VBA
0 vote79 views1 answer
Vbide vbproject reference
VBA
0 vote129 views1 answer
Vbnet round to nearnest thousand
VBA