[Immortal]

Καλή σας ημέρα!
Τάσο με σιγουριά μπορώ να σου πω πως χάθηκα με τόσα παραδείγματα και τόσες γραμμές
Δοκίμασα το τελευταίο παράδειγμα (βασιζόμενος στο ότι εάν δεν υπάρχει ο φάκελος, να δημιουργηθεί), σε module (εκεί πρέπει να μπει; Ή μέσα στο φύλλο;) και κοκκινίζει αυτό

Private Declare Function SHCreateDirectoryEx Lib "shell32" Alias "SHCreateDirectoryExA" _
             (ByVal hwnd As Long, ByVal pszPath As String, ByVal psa As Any) As Long

Να με συγχωρείτε για την ασχετοσύνη μου! Κάποια πράγματα δεν τα καταλαβαίνω καθόλου
Όπως και να έχει σας ευχαριστώ για τις προτάσεις και τον χρόνο σας!