[]
dosya adlarını excel'e yapıştırma
Selam Romalılar,
Çoklu dosya seçimi yapıp o dosyaların adlarını excel'e liste halinde yapıştırmak mümkün müdür?
Elimdeki filmlerin listesini bu şekilde 2 saniyede yapabilirim. Evet kurnazım, ama yardım bekliyorum
Sağolun varolun
Çoklu dosya seçimi yapıp o dosyaların adlarını excel'e liste halinde yapıştırmak mümkün müdür?
Elimdeki filmlerin listesini bu şekilde 2 saniyede yapabilirim. Evet kurnazım, ama yardım bekliyorum
Sağolun varolun
ben o işi totalCommander ile yapıyorum.
www.ghisler.com
total commander ile filmlerin olduğu dizine gelin ve ctrl+A ile tüm klasörleri/dosyaları seçin. Üst menüden Mark>Copy Selected Names to Clipboard u tıklayın ve excel e gidip yapıştırın. örnek;
img23.imageshack.us
www.ghisler.com
total commander ile filmlerin olduğu dizine gelin ve ctrl+A ile tüm klasörleri/dosyaları seçin. Üst menüden Mark>Copy Selected Names to Clipboard u tıklayın ve excel e gidip yapıştırın. örnek;
img23.imageshack.us
- zolax
(02.12.10 11:52:36)
boş bir excel dosyası açıp alt + f11 yapın. sol frame'de ThisWorkbook'a tıklayın, aşağıdaki kodu kopyalayıp yapıştırın. kodun 3. satırındaki "C:\" adresini klasör isimlerini almasını istediğiniz adres ile düzeltin ("d:\dosyalar\filmler" gibi). excel dosyasına dönün alt + f8 yapıp makroyu çalıştırın.
Sub Klasor_altklasor_listesi()
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder("C:\")
Set colSubfolders = objFolder.SubFolders
For Each objSubfolder In colSubfolders
c = c + 1
Cells(c, "a") = objSubfolder.Name
Next
End Sub
(git: 174573)
(git: 157617)
(git: 114931)
Sub Klasor_altklasor_listesi()
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder("C:\")
Set colSubfolders = objFolder.SubFolders
For Each objSubfolder In colSubfolders
c = c + 1
Cells(c, "a") = objSubfolder.Name
Next
End Sub
(git: 174573)
(git: 157617)
(git: 114931)
- mahallenindelisi
(02.12.10 11:54:36)
belki yapan programlar vardir ama ben soyle yapiyordum bu isi:
1) start-->run-->cmd
2) dir d:\movies /b/s >c:\filenames.txt
burda d:\movies yerine sizin filmlerin oldugu klasoru yazmaniz gerek. /b sadece dosyanin adini, /s alt klasorlerdeki dosyanin da adini kaydeder. olusan dosya c:\ nin altinda olacaktir bu sekilde yazarsaniz. ordan excele atmak kolay zaten. tabi bu sekilde yaparsaniz ne var ne yok hepsini kaydeder (film dosyalari, alt yazi dosyalarini vs.)
1) start-->run-->cmd
2) dir d:\movies /b/s >c:\filenames.txt
burda d:\movies yerine sizin filmlerin oldugu klasoru yazmaniz gerek. /b sadece dosyanin adini, /s alt klasorlerdeki dosyanin da adini kaydeder. olusan dosya c:\ nin altinda olacaktir bu sekilde yazarsaniz. ordan excele atmak kolay zaten. tabi bu sekilde yaparsaniz ne var ne yok hepsini kaydeder (film dosyalari, alt yazi dosyalarini vs.)
- alan shearer (02.12.10 11:55:56)
1
