C carlos XLDnaute Impliqué Supporter XLD 19 Novembre 2005 #1 Bonsoir le forum Est il possible de savoir combien de fichier il y a dans le dossier (sans sous dossier): C;\\tata ? Merci Carlos
Bonsoir le forum Est il possible de savoir combien de fichier il y a dans le dossier (sans sous dossier): C;\\tata ? Merci Carlos
myDearFriend! XLDnaute Barbatruc 19 Novembre 2005 #2 Bonsoir carlos, le Forum, Tu peux essayer : Sub Test() MsgBox NbFichiers('C:\tata') End Sub Function NbFichiers(Chemin As String) As Long NbFichiers = CreateObject('Scripting.FileSystemObject'). _ GetFolder(Chemin).Files.Count End Function Cliquez pour agrandir... Cordialement, Vote positif 0 Vote négatif
Bonsoir carlos, le Forum, Tu peux essayer : Sub Test() MsgBox NbFichiers('C:\tata') End Sub Function NbFichiers(Chemin As String) As Long NbFichiers = CreateObject('Scripting.FileSystemObject'). _ GetFolder(Chemin).Files.Count End Function Cliquez pour agrandir... Cordialement,
C Carlos Guest 19 Novembre 2005 #3 Bonsoir myDearFriend! GGGGGGGGGGGGGGGGGénial ... Merci Carlos Vote positif 0 Vote négatif