Dosya içinde klasör saydırma,uzaktan

[TUTKUN ORTAKLAR]

Herhangi bir excel sayfasından;
bir başka dosya (file) içindeki klasörlerin sadece sayısını
almak istiyorum.
Bu konuda yardımcı olabilirseniz sevinirim

 

[leumruk]

Merhaba,
Yolu kendinize göre düzenleyin.

Sub Dosya_Say()
yol = ThisWorkbook.Path & "\DENEME\"
Set Dosya = CreateObject("Scripting.FileSystemObject").GetFolder(yol).Files
MsgBox Dosya.Count
End Sub