Crétion d'un tableau regroupant les chemins complets de fichiers
Résolu
Daydayer
Messages postés
201
Date d'inscription
mercredi 1 décembre 2004
Statut
Membre
Dernière intervention
13 août 2005
-
26 janv. 2005 à 10:03
cs_jollivie Messages postés 28 Date d'inscription dimanche 29 décembre 2002 Statut Membre Dernière intervention 24 février 2008 - 26 janv. 2005 à 13:18
cs_jollivie Messages postés 28 Date d'inscription dimanche 29 décembre 2002 Statut Membre Dernière intervention 24 février 2008 - 26 janv. 2005 à 13:18
A voir également:
- Crétion d'un tableau regroupant les chemins complets de fichiers
- Afficher un tableau php en html - Conseils pratiques -PHP
- Retourner un tableau en c - Forum C / C++ / C++.NET
- Tableau decimal ✓ - Forum Java
- Retourner un tableau ✓ - Forum C# / .NET
- Retourner un tableau avec un méthode ✓ - Forum C++ & C++ .NET
1 réponse
cs_jollivie
Messages postés
28
Date d'inscription
dimanche 29 décembre 2002
Statut
Membre
Dernière intervention
24 février 2008
26 janv. 2005 à 13:18
26 janv. 2005 à 13:18
Dans les références, cocher Microsoft Scripting Runtime
a$ = <chemin complet du répertoire>
Dim fs As FileSystemObject
Set fs = New FileSystemObject
Dim objFolder As Folder
Set objFolder = fs.GetFolder(a$)
Dim f As File
i = 0
For Each f In objFolder.Files
i = i + 1
<si utilisation sous excel, par exemple>
Sheets("Sheet1").Cells(i, 1) = f.Path
Next
JO
a$ = <chemin complet du répertoire>
Dim fs As FileSystemObject
Set fs = New FileSystemObject
Dim objFolder As Folder
Set objFolder = fs.GetFolder(a$)
Dim f As File
i = 0
For Each f In objFolder.Files
i = i + 1
<si utilisation sous excel, par exemple>
Sheets("Sheet1").Cells(i, 1) = f.Path
Next
JO
