Suppression dossier présent à l'écran
Résolu
jean300
Messages postés
382
Statut
Membre
-
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
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
A voir également:
- Suppression dossier présent à l'écran
- Forcer suppression fichier - Guide
- Double ecran - Guide
- Dossier appdata - Guide
- Ecran a l'envers - Guide
- Capture d'écran whatsapp - Accueil - Messagerie instantanée
8 réponses
Bonjour.
Avec le logiciel Unlocker pas de problème même si trustedlnstaller ne vous l'autorise pas. Vous retrouverez ce fichier/dossier dans la corbeille.
https://www.commentcamarche.net/telecharger/utilitaires/22737-unlocker/
A + . . .
Avec le logiciel Unlocker pas de problème même si trustedlnstaller ne vous l'autorise pas. Vous retrouverez ce fichier/dossier dans la corbeille.
https://www.commentcamarche.net/telecharger/utilitaires/22737-unlocker/
A + . . .
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é :
Mais ça marche pas
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
Trouvé avec ce code :
Je vous remercie et vous souhaite une excellente journée
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
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonjour,
je t'ai envoyé un lien pour la même demande. Tu l'as mis en résolu!
https://forums.commentcamarche.net/forum/affich-35947922-supprimer-dossier-non-vide
je t'ai envoyé un lien pour la même demande. Tu l'as mis en résolu!
https://forums.commentcamarche.net/forum/affich-35947922-supprimer-dossier-non-vide
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.
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.
Là aussi tu as mis en résolu une question qui concernée le chemin du bureau!
https://forums.commentcamarche.net/forum/affich-35624558-chemin-du-bureau#1
@+
https://forums.commentcamarche.net/forum/affich-35624558-chemin-du-bureau#1
@+