Hur ser koden ut föra att skapa en mapp i katalogen där exe. filen ligger när ett program startar. Jag vill ha koden i form load.

If Dir("minkatalog", vbDirectory) = "" Then
MkDir "minkatalog"
End If


//Ibbe

Det går lite snabbare att använda Len för att kolla om den inte finns. Om man vill ha optimerad kod.
Märks nog inte, men ska man va petig så ska man :)

If Len(Dir("minkatalog", vbDirectory)) <= 0 Then
MkDir "minkatalog"
End If