Suppression dossier présent à l'écran

Résolu
jean300 Messages postés 382 Statut Membre -  
jean300 Messages postés 382 Statut Membre -
Bonjour,
Je sollicite vos connaissances pour supprimer le dossier "NouvelFiche.zip", dossier temporaire crée par macro et affiché à l'écran, après exécution de la dite macro
En vous remerciant

Configuration: Windows / Firefox 66.0

8 réponses

  2.
    f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    supprimer le dossier "NouvelFiche.zip"

    Kill ("Chemin\nomdefichier")
    0
  3. jean300 Messages postés 382 Statut Membre 14
     
    Bonjour Jojolaguitare, f894009
    Je vous remercie de me répondre pour m'aider à résoudre le problème
    Jojolaguitare, ce n'est pas ce que je souhaite
    f, j'ai essayé : 
    Sub SupDossierzip()   'TEST ESSAI
    Kill ("C:\userprofiles\"NouvelFiche.zip"
End Sub

    Mais ça marche pas
    0
  4. jean300 Messages postés 382 Statut Membre 14
     
    Trouvé avec ce code : 
    Private Sub SupDosFi()
Dim bureau$, Dossier$, zip$, fichier$
    bureau = CreateObject("WScript.Shell").SpecialFolders("desktop") & "\"
    Dossier = bureau & "NouvelFiche\"
   zip = bureau & "NouvelFiche.zip"
   If Dir(zip, vbArchive) <> "" Then Kill zip
        If Dir(Dossier, vbDirectory) <> "" Then
          fichier = Dir(Dossier & "*.*")
                Do While fichier <> ""
                  Kill Dossier & fichier
                  fichier = Dir
                Loop
          RmDir Dossier
        End If
End Sub

    Je vous remercie et vous souhaite une excellente journée
    0

  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. jean300 Messages postés 382 Statut Membre 14
     
    Re
    J'ai crié victoire trop vite, ça ne fonctionne pas
    0
  8. jean300 Messages postés 382 Statut Membre 14
     
    Bonjour cs_Le Pivert
    Je te remercie de me répondre.
    Effectivement, je pensais le sujet résolu, mais 2 personnes n'ont pas leur bureau en C:\ mais une en D:\ et une en E:\
    Aussi je me demande s'il n'y a pas une solution en faisant une recherche du dossier "NouvelFiche.zip" et le le supprimant.
    0
    2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Bonjour à tous
      Jean :
      Il faut mettre tout les fichiers et répertoires dans le "bureau ", c/d/e n'aura plus d'importance. C'est ce que je vous avais proposé.......
      0
  9. jean300 Messages postés 382 Statut Membre 14
     
    Bonjour cs_Le Pivert, f894009,
    Je vous remercie tardivement certes mais gros problème de santé.
    Effectivement le sujet est résolu.
    Je vous remercie tous deux.
    Au plaisir de vous rencontrer de nouveau/
    0