Nie można wyświetlić nazwy folderu i jego ścieżki w języku VBA

Out of category
21

Witam

W takim przypadku, aby ograniczyć się do pierwszego poziomu podfolderu, wystarczy usunąć pętlę rekurencyjną (Podfolder DoFolder) i wykluczyć foldery systemowe (już zakodowane przez @m.blt )