Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment supprimer le classeur actif (fichier actuel) dans Excel?

Supposons que vous ayez téléchargé un classeur à partir d'un site Web et que le classeur s'ouvre automatiquement. Toutefois, le classeur peut ne pas être le bon, ou le classeur ne contient pas les informations requises et que vous souhaitez supprimer. Parfois, vous oubliez probablement le répertoire par défaut dans lequel les fichiers téléchargés sont automatiquement enregistrés. Ne vous inquiétez pas, nous pouvons supprimer le classeur d'ouverture / actif sans le fermer directement dans Excel.

Supprimer le classeur actif (fichier actuel) avec VBA

Un clic pour ouvrir le dossier contenant le classeur actif avec ce classeur sélectionné

Pour ouvrir rapidement le dossier / répertoire contenant le classeur en cours, et avoir le classeur en cours sélectionné dans le dossier d'ouverture, s'il vous plaît essayez Kutools for Excel Dossier contenant ouvert utilitaire. Fonctionnalité complète Essai gratuit 60-day!

Annonce ouverte contenant le dossier 1



flèche bleue droite bulle Supprimer le classeur actif (fichier actuel) avec VBA

Cette méthode introduira un VBA pour supprimer le classeur d'ouverture / actif sans le fermer dans Excel. S'il vous plaît faites comme suit:

1. appuie sur le autre + F11 clés simultanément pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez insérer > Module, copiez le code VBA suivant et collez-le dans la fenêtre d'ouverture du module.

VBA: Supprimer le classeur actif sans le fermer dans Excel

Sub DeleteActiveWorkbook()
Dim xFullName As String
xFullName = Application.ActiveWorkbook.FullName
ActiveWorkbook.Saved = True
Application.ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill xFullName
Application.ActiveWorkbook.Close False
End Sub

3. appuie sur le F5 clé ou course bouton pour exécuter cette VBA.

Remarques:

(1) Ce VBA peut supprimer le classeur actif, mais ne peut pas fermer la fenêtre Excel. Si aucun classeur ne s'ouvre après la suppression du classeur actif, fermez la fenêtre Excel manuellement.

(2) Si le classeur actif n'a jamais été enregistré auparavant, ce VBA n'est pas capable de le supprimer. Toutefois, vous pouvez supprimer ce classeur non enregistré directement en le fermant.



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Randy · 7 days ago
    Very angry. I accidentally created a workbook. Seems like I'll have to do some code editing to kill the workbook, IF that works and I know the basics. What the HE*L. Come on guys... what's up?