157 résultats trouvés

par stepaustras
13 septembre 2017, 19:08
Forum : Excel - VBA
Sujet : Macro pour supprimer un fichier excel
Réponses : 41
Vues : 405

Re: Macro pour supprimer un fichier excel

Latitude Nord 45° 53 minutes 57.289 secondes
Longitude Est 6° 7 minutes 45.782 secondes

:mrgreen: :mrgreen:
par stepaustras
13 septembre 2017, 18:32
Forum : Excel - VBA
Sujet : Macro pour supprimer un fichier excel
Réponses : 41
Vues : 405

Re: Macro pour supprimer un fichier excel

Bon c'est OK, ça fonctionne nickel ça scan plus vite qu'un anti virus :lol: Merci a toi h2so4, James007 et aussi a Patty5046 de ta participation, un grand merci ;;)

CHAMPAGNE :-)))) OOOO OOOO
par stepaustras
13 septembre 2017, 18:18
Forum : Excel - VBA
Sujet : Macro pour supprimer un fichier excel
Réponses : 41
Vues : 405

Re: Macro pour supprimer un fichier excel

merci a toi mais il ne fonctionne pas ce code. Il me manque juste pour chercher deux fichiers et voilà ça sera bon. J'aurais pu rajouter deux trois IF mais ça colle pas avec le code de h2so4 c'est pas au même endroit :mrgreen: If nomfic = "test.xlsm" Then Kill f2 End If Me faudrait ici avoir deux fi...
par stepaustras
13 septembre 2017, 17:21
Forum : Excel - VBA
Sujet : Macro pour supprimer un fichier excel
Réponses : 41
Vues : 405

Re: Macro pour supprimer un fichier excel

Bob bah merci ça l'air d'être bon il reste bien dans C:\Users juste un truc en plus si je veux mettre deux fichiers a chercher c'est possible essai.xlsm et essai1.xlsm ?
par stepaustras
13 septembre 2017, 16:30
Forum : Excel - VBA
Sujet : Macro pour supprimer un fichier excel
Réponses : 41
Vues : 405

Re: Macro pour supprimer un fichier excel

Merci ça l'air de fonctionner il met boite de dialogue quand il trouve supprime le fichier concerné et continue son scan sur tous C: alors que je lui demande que C:\Users\ ? En faite il scan tous C: Sub aargh() rep = "c:\Users\" ' répertoire à examiner kfif rep, "essai.xlsm" End Sub Sub kfif(folder,...
par stepaustras
13 septembre 2017, 16:07
Forum : Excel - VBA
Sujet : Macro pour supprimer un fichier excel
Réponses : 41
Vues : 405

Re: Macro pour supprimer un fichier excel

Merci h2s04 , La macro fonctionne, j'ai mis ça rep = "C:\Users\Stef\Nouveau dossier\" Mais avec C:\Users ça marche pas Et donc j'obtiens l'erreur a cette ligne pour rep = "c:\Users\" For Each F In fold.SubFolders Même si je met d:\ ou e:\ vu que j'ai plusieurs disque même erreur a for Each....
par stepaustras
13 septembre 2017, 15:22
Forum : Excel - VBA
Sujet : Macro pour supprimer un fichier excel
Réponses : 41
Vues : 405

Re: Macro pour supprimer un fichier excel

Je dis pour tous le monde doit avoir ce dossier Users j'ai voulu le modifier ça marche pas d'ou ma conclusion.Parce que sur XP t'as pas Users :mrgreen: Par contre ça ma donné une idée j'ai crée dossier User à la place avec mon fichier xlsm et la ça marche je vois bien dans le fichier excel qu'il a t...
par stepaustras
13 septembre 2017, 15:13
Forum : Excel - VBA
Sujet : Macro pour supprimer un fichier excel
Réponses : 41
Vues : 405

Re: Macro pour supprimer un fichier excel

Pour tous le monde c'est C:\Users un dossier original Windows non modifiable tu peux pas le renommer et tu peux pas en créer un autre avec le même nom à la racine de C logique lol et je n'ai pas de dossier "User" à la racine de C
par stepaustras
13 septembre 2017, 15:06
Forum : Excel - VBA
Sujet : Macro pour supprimer un fichier excel
Réponses : 41
Vues : 405

Re: Macro pour supprimer un fichier excel

J'ai mis un fichier xlsm dans C:\Users Sub MacroThauThème() Dim CI As String 'définit le Chemin d'accès du dossier Initial Dim SF As Object 'déclare la variable SF (Système de Fichiers) Dim DI As Object 'déclare la variable DI (Dossier Initial) Dim I As Integer 'déclare la variable I (Incrément) Dim...
par stepaustras
13 septembre 2017, 15:01
Forum : Excel - VBA
Sujet : Macro pour supprimer un fichier excel
Réponses : 41
Vues : 405

Re: Macro pour supprimer un fichier excel

stepaustras a écrit :Je me demande si ce code fonctionne plus sur des versions supérieur a excel 2007 ou pas
2007 :mrgreen: