Tüm dosya adlarını bir çalışma sayfasında toplamak işiniz için çok önemlidir. Bu yazıda, VBA makrosunu kullanarak tüm dosya adlarını bir çalışma sayfasına girmek için bir yöntem tanıtacağız.
Önceki yazımızda Bir Klasördeki Tüm Dosya Adlarının Listesini Excel Çalışma Sayfanıza Kopyalamak için 2 Yöntem, bir klasördeki tüm dosya adlarını bir çalışma sayfasına listelemek için iki yöntem sunduk. Ve şimdi başka bir yöntem bulduk. Bu görevi tamamlamak için VBA makrosunu da kullanabilirsiniz. Aşağıdaki adımları izleyin ve nasıl kullanılacağını görün.
Bir Klasördeki Tüm Dosya Adlarının Listesini Kopyalayın
- Dosya adlarını girmeniz gereken çalışma kitabını açın.
- Ardından klavyedeki "Alt +F11" kısayol tuşlarına basarak Visual Basic düzenleyicisini açın.
- Bundan sonra, araç çubuğundaki “Ekle” sekmesine tıklayın.
- Ardından açılır listeden “Modül” seçeneğini seçin. Bu nedenle editöre yeni bir modül eklediniz.
- Bu adımda, aşağıdaki kodları yeni modüle kopyalayın:
Sub ListAllFileNames() Dim strTargetFolder As String, strFileName As String, nCountItem As Integer ' Initialization nCountItem = 1 strTargetFolder = "C:\Users\Sample\Desktop\Sales Volume" & "\" strFileName = Dir(strTargetFolder, vbDirectory) ' Get the file name Do While strFileName <> "" If strFileName <> "." And strFileName <> ".." Then Cells(nCountItem, 1) = strFileName nCountItem = nCountItem + 1 End If strFileName = Dir Loop End Sub
Bu makroda, hedef klasörü gerçek ihtiyacınıza göre değiştirmeniz gerekiyor. Dosya adlarını ise çalışma sayfasındaki A sütununa gireceğiz. Dosya adlarını başka bir aralığa girmeniz gerekiyorsa, kodları da değiştirebilirsiniz.
- Daha sonra bu makroyu çalıştırın. Bu makroyu çalıştırmak için araç çubuğundaki “Run Sub” butonuna tıklayabilir veya klavyede “F5” butonuna basabilirsiniz.
- Sonra çalışma sayfasına geri dönün. Klasördeki tüm dosya adlarının zaten A sütununda göründüğünü göreceksiniz.
Makaledeki diğer iki yöntemle karşılaştırıldığında Bir Klasördeki Tüm Dosya Adlarının Listesini Excel Çalışma Sayfanıza Kopyalamak için 2 Yöntem, VBA makrosunu kullanmanın çok uygun olduğunu göreceksiniz. Ancak öte yandan Excel VBA'ya aşina değilseniz, kodları değiştirirken hatalarla karşılaşırsınız. Bu nedenle, gerçek ihtiyacınıza göre üç yöntemden birini kullanabilirsiniz.
Tehlikeli Yazılımlara Dikkat Edin
Bilgisayarınıza kesinlikle bir çok yazılım kuracaksınız. Ve bu uygulamalar işinizde size çok yardımcı olabilir. Ancak, bazıları tehlikeli uygulamalardır. Bunları bilgisayarınıza yükledikten sonra, kişisel bilgilerinizi toplayacaklardır. Daha da kötüsü, Excel dosyalarınız da bunlardan zarar görecek. Şu anda, tehlikeli yazılımı hemen kaldırın. Ayrıca, bir kurtarma aracı da kullanmanız gerekir. hasarlı xlsx dosyasını onar. Böylece Excel dosyalarınızın güvende olduğundan emin olabilirsiniz.
Yazar Tanıtımı:
Anna Ma bir veri kurtarma uzmanıdır. DataNumendahil olmak üzere veri kurtarma teknolojilerinde dünya lideri olan , Inc. Word docx dosya sorununu onarın ve görünüm onarım yazılım ürünleri. Daha fazla bilgi için ziyaret edin www.datanumen.com