A voir également:
- Récupérer les noms de fichiers d'un dossier
- Comment récupérer les messages supprimés sur whatsapp - Guide
- Recuperer video youtube - Guide
- Comment récupérer un compte facebook piraté - Guide
- Mettre un mot de passe sur un dossier - Guide
- Dossier appdata - Guide
2 réponses
Bonjour,
C'est la fonction Dir qui est utilisée pour connaitre les fichiers présents dans un répertoire.
Voici un exemple
Sub list_directory()
Dim MyFile As String
MyFile = Dir("C:\TEST\*.XLS") ' Renvoie le nom de fichier avec l'extension indiquée
MsgBox MyFile
' Appelle de nouveau Dir sans argument pour renvoyer le
' fichier *.XLS suivant dans le même dossier.
Do
MyFile = Dir
'
MsgBox MyFile
Loop Until MyFile = ""
'
End Sub
Salut
C'est la fonction Dir qui est utilisée pour connaitre les fichiers présents dans un répertoire.
Voici un exemple
Sub list_directory()
Dim MyFile As String
MyFile = Dir("C:\TEST\*.XLS") ' Renvoie le nom de fichier avec l'extension indiquée
MsgBox MyFile
' Appelle de nouveau Dir sans argument pour renvoyer le
' fichier *.XLS suivant dans le même dossier.
Do
MyFile = Dir
'
MsgBox MyFile
Loop Until MyFile = ""
'
End Sub
Salut
18 mars 2008 à 10:57