Bu dosya, seçtiğiniz bir klasördeki dosyaların adlarını Excel sayfasına alt alta yazar ve her ada, dosyayı açacak bir köprü ekler. Klasör içeriğini hızlıca listelemek ve listeden tek tıkla dosyalara ulaşmak istediğinizde kullanabilirsiniz.
Bilmeniz gereken noktalar:
Dosyanın içeriği
- Sayfa1: A1 hücresinde "Dosya İsimleri" başlığı vardır. A sütununda örnek olarak 10114 (8).JPG, 10121 (3).jpg gibi resim dosyası adları listelenmiştir (A606 hücresine kadar).
- Module1:
kopruleadlı makroyu içerir.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.- koprule: Önce bir klasör seçme penceresi açar. Pencereyi seçim yapmadan kapatırsanız "Seçim Yapmadan Çıktınız" uyarısı verir ve işlemi sonlandırır. Klasör seçildiğinde FileSystemObject ile klasördeki dosyaları tek tek dolaşır, her dosya adını Sayfa1'de A sütununun ilk boş satırına yazar ve o hücreye dosyanın tam yolunu gösteren bir köprü ekler.
Bilmeniz gereken noktalar:
- Makro yeni adları mevcut listenin altına ekler, önceki satırları silmez. Yeniden çalıştırırsanız aynı dosyalar tekrar yazılır.
- Sonunda sayıyı bildiren mesaj kodundaki
saydeğişkenine bağlıdır, ancak bu değişkene değer atanmadığı için sayı sıfır kabul edilir ve her çalıştırmada "dosya isimleri bulunamadı" mesajı görünür. Listeleme ve köprü ekleme bundan etkilenmez. - Yalnızca seçilen klasörün kendi dosyaları listelenir, alt klasörler taranmaz.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Alt + F8 tuşlarıyla makro listesini açın,
koprulemakrosunu seçip Çalıştır'a tıklayın. - Açılan pencerede listelemek istediğiniz klasörü seçin ve Tamam'a tıklayın.
- Dosya adları Sayfa1'in A sütununa yazılır. Bir ada tıkladığınızda ilgili dosya açılır.