Klasörleri Excelde Listeleme

Bu dosya, seçilen bir klasörün içindeki alt klasörlerin adlarını Excel sayfasına aktarır. Klasör seçimi Windows'un klasör gözatma penceresiyle yapılır; klasör adları A sütununa alt alta yazılır. Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sayfa1: Klasör adları A sütununda listelenir, seçilen klasörün yolu B1 hücresine yazılır. Örnek veride C sürücüsünden alınmış $Recycle.Bin, $WinREAgent, BIOS, Config.Msi, Documents and Settings, Drivers gibi klasör adları bulunur.
• Sayfadaki Düğme isimli buton listeleme makrosunu çalıştırır.

Dosyada formül yoktur; tüm işlem makro ile yapılır.

Makrolar​

Dosyada Module1 modülü içinde tek makro bulunur: Klasorler. Sayfadaki Düğme ile çalışır. Makro şu adımları izler:

1. A:B sütunlarındaki önceki içeriği temizler.
2. "Lütfen Bir Klasör Seçin !" başlıklı klasör seçme penceresini açar.
3. Seçilen klasörün yolunu B1 hücresine yazar ve sonuna "\" ekler.
4. FileSystemObject ile seçilen klasörün alt klasörlerini dolaşır, adlarını A1 hücresinden başlayarak alt alta yazar.

Makro ayrıca Module1 içindeki ilk satırda yer alan deg sabitini seçilen klasör yolunu içerecek şekilde yeniden yazar. Bunun için dosyanın kendi VBA kodunu düzenler; bu nedenle Excel'de "VBA proje nesne modeline erişime güven" seçeneğinin açık olması gerekebilir. Makroda dosya silme ya da dışarıya bağlantı kuran bir işlem yoktur.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Sayfa1 üzerindeki Düğme butonuna basın.
3. Açılan pencereden listelemek istediğiniz klasörü seçip onaylayın.
4. Alt klasör adları A sütununa, klasör yolu B1 hücresine yazılır.

Her çalıştırmada önceki liste silinir; bir listeyi saklamak için sonucu başka bir sayfaya ya da dosyaya kopyalayın.

Klasör yerine klasördeki dosyaları listelemek ya da Excel ile klasör oluşturmak isterseniz şu kaynaklara bakabilirsiniz:

• Klasör İsimlerini Excele Aktarma
• Klasördeki Dosya İsimlerini Listeleme
• Excel ile Otomatik Klasör Oluşturma

Klasörlerle ilgili sorularınız için forum alanını kullanabilirsiniz.