Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Question pour les pros... ;-)

R

Routrout

Guest
J'aimerais faire une macro qui irait vérifier si la valeur contenue dans la cellule A1 de tous les fichiers excels d'un répertoire (contenant lui meme un tas de sous-répertoire contenant des fichiers excels) est plus basse que 1.

Si oui, mettre le chemin d'accès de ce fichier dans un tableau.

Est-ce possible?
 
T

Ti

Guest
tu fais une recherche de tous les fichiers Excel avec l'objet FileSearch et ensuite tu appliques une des méthodes souvent documentées ici (il y en a qui datent de ces derniers jours, postées par Thierry) pour récupérer des valeurs d'un fichier fermé. Et voilà.
 
T

Thierry

Guest
Salut Routrout

Trouvé sur l'aide....

Exemple File search Objet Excel :
With Application.FileSearch
.LookIn = "c:\my documents"
.FileType = msoFileTypeExcelWorkbooks
.Execute
End With

Exemple FileSearch Office Objets :
With Application.FileSearch
If .Execute() > 0 Then
MsgBox "There were " & .FoundFiles.Count & _
" file(s) found."
For i = 1 To .FoundFiles.Count
MsgBox .FoundFiles(i)
Next i
Else
MsgBox "There were no files found."
End If
End With

Ou encore...
With Application.FileSearch
.NewSearch
.LookIn = "C:\My Documents"
.SearchSubFolders = True
.FileName = "Run"
.MatchTextExactly = True
.FileType = msoFileTypeAllFiles
End With

et pour la partie de recherche sur le classeur fermé, voir cette ficelle récente :
<http://www.excel-downloads.com/html/French/forum/read.php?f=1&i=6802&t=6790>

Bon aprèm.
@+Thierry
 

Discussions similaires

Réponses
2
Affichages
464
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…