Discussion :

[GaspardBarrier]

Bonjour à tous,

Je suis en train de développer une macro dont l'exécution implique l'ouverture de plusieurs onglets que je cherche à fermer en fin de code. Seulement il faut que l'un d'entre eux reste ouvert, il ne suffit donc pas de fermer tout le classeur. J'ai chercher sur de nombreux forums, mais impossible de trouver la réponse. J'ai trouvé comment fermer tout le classeur de beaucoup de manières différentes, mais rien concernant la fermeture d'un onglet en particulier

Mon code actuel est le suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Sub reset()
 Worksheets("5calendriersFrance").Activate
 ActivateWorkSheet.Close
 Worksheets("50calendriersFrance").Activate
 ActivateWorkSheet.Close
 Worksheets("5calendriersEtranger").Activate
ActivateWorkSheet.Close
 Worksheets("50calendriersEtranger").Activate
 ActivateWorkSheet.Close
End Sub

Est ce que vous pouvez m'aider ?

Merci infiniment

[GaspardBarrier]

C'est bon j'ai trouvé. Pour ceux que ça intéresse, il faut utiliser la commande:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    Sheets("NomOnglet").Select
    ActiveWindow.SelectedSheets.Delete

[clementmarcotte]

Bonjour

C'est bon j'ai trouvé. Pour ceux que ça intéresse, il faut utiliser la commande:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    Sheets("NomOnglet").Select
    ActiveWindow.SelectedSheets.Delete

Tu es sûr ?

Tu ne fermes pas ta feuille, tu la supprime complètement...

[GaspardBarrier]

Absolument ! Ce code là ferme uniquement l'onglet qu'on lui demande. Je l'ai reppeté quatre fois pour fermer les quatres pages ouvertes pour les macros précédentes...
Et ça marche