kikouyou
XLDnaute Junior
Bien le bonjour à vous tous,
Je me demandais si avec EXCEL2003 il est possible de compter le nombre de fichiers d'une même extension dans un dossier. ( ex : .pdf ).
Et naturellement, récupérer ce nombre dans une variable.
Je sais que l'on peut lister les fichiers présents par cette fonction :
Function ChargerFichiers()
Application.ScreenUpdating = False
Dim DirVar As String
'DirVar = Dir("c:\mes documents\*.pdf")
DirVar = Dir(Application.DefaultFilePath & "\*")
Do While DirVar <> ""
UserForm1.ComboBox1.AddItem DirVar
DirVar = Dir()
Loop
UserForm1.Show
End Function
le nombre total de fichiers est il trouvable.
Merci.
A bon programmeur, Salut
Kikouyou
Je me demandais si avec EXCEL2003 il est possible de compter le nombre de fichiers d'une même extension dans un dossier. ( ex : .pdf ).
Et naturellement, récupérer ce nombre dans une variable.
Je sais que l'on peut lister les fichiers présents par cette fonction :
Function ChargerFichiers()
Application.ScreenUpdating = False
Dim DirVar As String
'DirVar = Dir("c:\mes documents\*.pdf")
DirVar = Dir(Application.DefaultFilePath & "\*")
Do While DirVar <> ""
UserForm1.ComboBox1.AddItem DirVar
DirVar = Dir()
Loop
UserForm1.Show
End Function
le nombre total de fichiers est il trouvable.
Merci.
A bon programmeur, Salut
Kikouyou