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 vote358 views1 answer
Vba option button selected
VBA
0 vote366 views1 answer
Vba get relative cell address
VBA
1 vote387 views1 answer
Vba ubound array 2-dimensional
VBA
0 vote361 views1 answer
Excel vba formatconditions positive
VBA
0 vote355 views1 answer
Vba word open document read only
VBA
0 vote368 views1 answer
Worksheet.pastespecial textbox
VBA
0 vote376 views1 answer
Excel vba ternary
VBA
0 vote370 views1 answer
Loop through all text boxes in a form vb
VBA
1 vote388 views1 answer
Set font for ms chart vb.net
VBA
22 votes521 views1 answer
Xlvba check for folder
VBA