Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Application.FileSearch qui plante

3 réponses
Avatar
titi
Bonjour

je ne comprends pas

j'ai tapé ce bout de code


With Application.FileSearch
.NewSearch
.LookIn = "d:\"
.Filename = "*.htm*"
.FileType = msoFileTypeAllFiles
.SearchSubFolders = True
If .Execute > 0 Then
MsgBox .FoundFiles.Count
End If
End With


or ca plante dès le With Application.FileSearch avec une erreur de
type "cet objet ne gère pas cette action "

sous office 2007


qu'est ce qui m'échappe ???

Merci

3 réponses

Avatar
Daniel
Bonjour.
Il parait (je n'ai pas XL2007) que File search ne fonctionne plus avec
XL2007.
Cordialement.
Daniel
<titi> a écrit dans le message de news:

Bonjour

je ne comprends pas

j'ai tapé ce bout de code


With Application.FileSearch
.NewSearch
.LookIn = "d:"
.Filename = "*.htm*"
.FileType = msoFileTypeAllFiles
.SearchSubFolders = True
If .Execute > 0 Then
MsgBox .FoundFiles.Count
End If
End With


or ca plante dès le With Application.FileSearch avec une erreur de
type "cet objet ne gère pas cette action "

sous office 2007


qu'est ce qui m'échappe ???

Merci



Avatar
titi
Ca expliquerait pourquoi on ne le retrouve pas dans l'aide de VB
en tant que propriété de l'objet Application

et alors on fait comment maintenant pour rechercher des fichiers ??
Avatar
titi
j'ai trouvé un bout de code