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 vote239 views1 answer
Vba remove the first character of string
VBA
5 votes205 views1 answer
Excel vba high word from Long Integer
VBA
0 vote214 views1 answer
Vb test if reference is null
VBA
0 vote224 views1 answer
Thread sleep vb
VBA
1 vote208 views1 answer
What does vbs stand for
VBA
0 vote227 views1 answer
Filesystemobject vba reference
VBA
3 votes242 views1 answer
Extract word in a text in excel
VBA
4 votes227 views1 answer
Excel vba Imitating the "IN" operator from python
VBA
1 vote193 views1 answer
Excel vba convert cells(1,1) into A1 and vice versa
VBA
0 vote208 views1 answer
VBA Sleep Snippet
VBA