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

5 votes291 views1 answer
Excel vba low byte from INTEGER
VBA
0 vote293 views2 answers
Open url from vba
VBA
4 votes280 views1 answer
Excel vba check cell not empty
VBA
3 votes305 views2 answers
Vba date to string
VBA
31 votes384 views1 answer
Vba how to convert a column number into an Excel column
VBA
0 vote288 views1 answer
Vba change named range address
VBA
0 vote276 views1 answer
Vb net show lines for all axis labels in chart
VBA
0 vote301 views1 answer
Vba character ascii code
VBA
0 vote295 views1 answer
Loop through each cell in dgv vbnet
VBA
0 vote306 views2 answers
Checking and changing system volume vb.net
VBA