Recherche de fichiers qui ne contiennent pas une lettre précise
13 réponses
Apitos
Bonsoir =E0 tous,
Cette macro est pour rechercher tous les fichiers dont leurs noms
commencent par "P" :
'-------------------------------------
Sub ChercheFichier()
Set fs =3D Application.FileSearch
With fs
=2ELookIn =3D "C:\Fichiers"
=2EFileName =3D "P*"
If .Execute > 0 Then
MsgBox .FoundFiles.Count & " Fichier(s) ont =E9t=E9 trouv=E9s."
For I =3D 1 To .FoundFiles.Count
MsgBox .FoundFiles(I)
Next I
Else
MsgBox "Aucun fichier n'a =E9t=E9 trouv=E9."
End If
End With
End Sub
'-----------------------------------
Alors comment faire pour trouver dans un r=E9pertoire tous les fichiers
qui ne contiennent pas dans leurs noms la lettre "P" par exemple ?
Je laisse à quelqu'un d'autre l'opportunité de te répondre et je mets fin à ma participation sur ce fil.
Certains préfèrent procéder par l'intermédiaire de pièces jointes tant mieux si cela leur convient.... moi, je préfère que les questions soient énoncés directement ici dans le fil... il en va des réponses !
Je laisse à quelqu'un d'autre l'opportunité de te répondre
et je mets fin à ma participation sur ce fil.
Certains préfèrent procéder par l'intermédiaire de pièces jointes
tant mieux si cela leur convient.... moi, je préfère que les questions
soient énoncés directement ici dans le fil... il en va des réponses !
"Apitos" <apitos@gmail.com> a écrit dans le message de news:
98bf84f5-42e9-44ca-929c-a3a1a1cc2c91@q39g2000hsf.googlegroups.com...
Re,
Je laisse à quelqu'un d'autre l'opportunité de te répondre et je mets fin à ma participation sur ce fil.
Certains préfèrent procéder par l'intermédiaire de pièces jointes tant mieux si cela leur convient.... moi, je préfère que les questions soient énoncés directement ici dans le fil... il en va des réponses !
