Microsoft 365 Supprimer fichier du bureau dont le nom comporte toto

Dranreb

XLDnaute Barbatruc

• 14 Juin 2020

• #2

Bonjour.
Utilisez la fonction Dir(*toto*.xlsm") après avoir fait un ChDir vers le chemin de votre bureau.

 

Vote positif 0 Vote négatif

R

raf26

XLDnaute Occasionnel

• 14 Juin 2020

• #3

Bonjour Dranreb

Ok merci, dir pour lister les fichiers du bureau

Mais comment lister ceux dont le nom comporte toto et les supprimer ?

je ne maitrise pas assez

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 14 Juin 2020

• #4

VB:

Dim NomFic As String
ChDrive "C": ChDir "C:\Users\…\DeskTop"
NomFic = Dir("*toto*.xlsm")
While NomFic <> ""
   Kill NomFic
   NomFic = Dir: Wend

 

Vote positif 0 Vote négatif

Solution

R

raf26

XLDnaute Occasionnel

• 14 Juin 2020

• #5

Re Dranreb,

Merci pour ton aide, c'est exactement ce que je cherchais.

Je marque ton post comme solution.

Encore merci 😉

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

Supporter XLD

• 14 Juin 2020

• #6

Bonjour Dranreb, raf26,
@ Dranreb
🙂 ton code m'intéresse beaucoup est-il possible de faire la même chose si les classeurs sont n'importe où dans l'ordi ?
Merci à toi,
bonne fin de dimanche,
lionel,

 

Vote positif 0 Vote négatif

J

jmfmarques

XLDnaute Accro

• 14 Juin 2020

• #7

Bonjour

est-il possible de faire la même chose si les classeurs sont n'importe où dans l'ordi ?

Cliquez pour agrandir...

Ah çà, pour être possible, cela l''est, mais au prix du parcours de tous les fichiers de tous les sous-dossiers de tous les dossiers et toutes les partitions du disque dur --->> traduction : au prix lourd d'une navigation à la rame !
Si tu veux en avoir une petite idée, utilise donc l'outil ad hoc de recherche de fichiers de Windows

 

Dernière édition: 14 Juin 2020

Vote positif 0 Vote négatif