|
Dans Microsoft Excel , vous pouvez supprimer une feuille de calcul en cliquant sur son onglet et en sélectionnant " Supprimer" du menu contextuel. Une petite fenêtre vous demandera de confirmer votre action. Cela permet d'éviter les suppressions accidentelles . En passant par l'invite de confirmation peut être gênant , cependant, si vous essayez de supprimer plusieurs feuilles . Heureusement, vous pouvez également supprimer des feuilles de calcul à l'aide de VBA. Excel VBA est livré avec une fonction " Feuilles " que vous pouvez utiliser pour créer, renommer , déplacer et supprimer des feuilles de calcul. Avec quelques lignes de code , vous pouvez contourner la fenêtre de confirmation et supprimer des feuilles de calcul plus rapide . Instructions
1 Démarrez Microsoft Excel. Appuyez sur " Ctrl " plus " O ", sélectionnez votre classeur dans la liste et cliquez sur «Ouvrir».
2 Presse "Alt " plug " F8 " pour ouvrir la fenêtre "Macros " . Tapez " RemoveSheets " dans la case " Nom de la macro " et cliquez sur "Créer". Cela ouvre l'éditeur Visual Basic ( VBE ) .
3 Entrez le code suivant dans le VBE .
RemoveSheets sub ()
wSheets = Array ( " Feuil1" , " Feuil2 ", " Sheet3 " )
Application.DisplayAlerts = False
Pour n = 0 To UBound ( wSheets )
On Error Resume Next
Feuilles de ( wSheets ( n)) . Supprimer
suivante N
Application.DisplayAlerts = True End Sub
4 Remplacer " Feuil1 ", " Feuil2 " et " Sheet3 " avec les noms des feuilles de calcul que vous souhaitez supprimer. Pour ajouter un autre nom à la liste , tapez une virgule et insérez le nom de la feuille avant la parenthèse fermante de la fonction Array. Assurez-vous de placer entre guillemets .
5 Appuyez sur " Alt " plus " Q " pour fermer le VBE .
6 Appuyez sur " Alt " plus "F8" à ouvrir à nouveau la fenêtre " Macros " . Sélectionnez " RemoveSheets " dans la liste , puis cliquez sur "Exécuter".
|
