Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

pb macro masquer onglet

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion foxbox545
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
F

foxbox545

Guest
Bonjour tout le monde,

je vous expose mon problème:

J'ai dans un premier temps créé des commandboutons sur ma première feuille. Lorsque je clique sur ces boutons ils me mène chacun sur une feuille différentes (c'est une macro que j'avais configuré). Jusque la tout fonctionne à la perfection. Cependant mon fichier excel comporte un grand nombre de feuille, je dirais même un trop grand nombre. Ainsi j'ai créé une macro masqueongletsaufun:

Sub MasqueOngletSaufUn()
Dim nbonglet As Byte
For nbonglet = 1 To ThisWorkbook.Sheets.Count
If Sheets(nbonglet).Name <> "Nom de l'onglet à garder" Then
Sheets(nbonglet).Visible = 0
End If
Next
End Sub

qui fonctionne elle aussi très bien.
J'en arrive maintenant à mon problème: les macros attribuées au commandbutons et la macro masqueongletsaufun ne sont pas compatible !!! En fait, lorsque je lance la macro masquer les onglets et que je clique ensuite sur un de mes boutons un msg d'erreur s'affiche.

Ainsi mon objectif serait: de masquer tous les onglet sauf un (celui comportant les commandboutons) mais il faudrait que lorsque je clique sur un de mes boutons, la page qui lui est attribué s'ouvre. Comment faire?

je suis conscient que mon msg n'est pas très clair mais jspr sincérement que vous pourrez m'aider. Merci d'avance
 
Trier par date Trier par votes
Re : pb macro masquer onglet

Bonjour,

sans fichier exemple, effectivement, ca manque un peu de clareté. 😱

Un petit indice toutefois : dans les macros qui doivent afficher un onglet, as tu fais un sheets("xxx").visible= true avant de faire un sheets("xxx").select ?
 
Vote positif 0 Vote négatif
Re : pb macro masquer onglet

Bonjour Larson
Larson à dit:
(...) Un petit indice toutefois : dans les macros qui doivent afficher un onglet, as tu fais un sheets("xxx").visible= true avant de faire un sheets("xxx").select ? (...)
Cliquez pour agrandir...
Je ne pense pas que ce soit un problème, mais nous serons fixés lorsque notre ami aura déposé son classeur de démonstration.​
Bonne journée.
ROGER2327
 
Vote positif 0 Vote négatif
Re : pb macro masquer onglet

dsl je suis nouveau sur le forum et je rencontre un problème au momen d'intégrer ma pièce jointe. Celle ci est trop volumineuse (elle dépense 48ko) et même Zipé elle pèse pas moins de 2.30mo cment dois je faire pour la soumettre?
 
Vote positif 0 Vote négatif
Re : pb macro masquer onglet

Voila ci joint mon classeur

Je vais essayer de reformuler mes objectifs de façon un peu plu clair.
j'aimerais qu'il n'apparaisse comme feuille que l'onglet "carte" lorque l'on ouvre le fichier. Mais j'aimerais aussi que lorsque l'on clique sur un des boutons présent dans l'onglet carte la macro associé au bouton s'éxécute.

merci encore
 

Pièces jointes

Vote positif 0 Vote négatif
Re : pb macro masquer onglet

Re...
Code: 
[COLOR="DarkSlateGray"]Private Sub Workbook_Open()
Dim n As Long
   For n = 1 To Me.Sheets.Count
      If Me.Sheets(n).Name <> "Carte" Then Me.Sheets(n).Visible = False
   Next n
End Sub[/COLOR]
placé dans le module ThisWorkbook masque toutes les feuilles sauf Carte à l'ouverture du classeur.
Code: 
[COLOR="DarkSlateGray"]Private Sub CommandButton1_Click()
   Sheets("Ouest").Visible = True
   Sheets("Ouest").Activate
End Sub[/COLOR]
rend visible et active la feuille Ouest.​
Bon courage.
ROGER2327
 
Vote positif 0 Vote négatif
Re : pb macro masquer onglet

Merci beaucoup ça marche !!
J'ai encore un dernier service à de demander. J'aimerais créer une macro qui me renverais à ma page carte en masquant tous les autres onglets mais cela sur commande (autrement dit cette macro serait la même dans son concept que celle que tu m'as fournis précedemment mais il faudrait que celle ci s'effectue sur commande via un bouton par exemple).
exemple: j'ouvre mon fichier, je clique sur le bouton "ouest" qui va m'amener sur un nouvel onglet. Pb: lorsque je reviens sur la feuille "carte", l'onglet "ouest" est toujours affiché. j'aimerais donc faire une macro me permettant d'effectuer la même opération que celle que tu m'a fourni précedemment (cad qui masque les onglet autre que "carte") mais que cela se fasse sur commande via un bouton par exemple. Je ne sais pas comment faire puisque ta macro ne semble fonctionner que dans ThisWorkBook.

Merci
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

A
  • Question Question
XL pour MAC Problème avec une macro dupliquant une feuille contenant une macro
Réponses
8
Affichages
388
AlineJ
A
Y
  • Question Question
XL 2019 Masquer automatiquement des lignes selon la valeur d'une cellule ?
Réponses
2
Affichages
554
Yogean
Y
B
  • Question Question
XL 2019 Dans une macro de démarrage de fichier masquer le code par des Astérix ou point
Réponses
3
Affichages
545
sylvanu
C
  • Résolu(e)
XL 2021 Macro pour mise en page
Réponses
11
Affichages
889
candido57
C
C
  • Question Question
XL 2016 Excel Macro permettant de masquer une ligne lorsque les cellules de 2 colonnes contigües sont vides
Réponses
11
Affichages
659
chris63
C
T
  • Résolu(e)
Microsoft 365 pb effacement macro
Réponses
8
Affichages
795
Themax
T
I
  • Question Question
XL pour MAC Xlsm - Fichier permettant de gérer un cross d'établissement scolaire
Réponses
8
Affichages
703
iruri
I
  • Résolu(e)
XL 2016 Afficher Onglet par VBA
Réponses
10
Affichages
685
Lolote83
L
  • Résolu(e)
XL 2013 (RESOLU) Infobulle sur Images sans toucher leurs Macro
Réponses
9
Affichages
1 K
job75
Y
  • Question Question
XL 2021 Lien Hypertexte et feuilles masquées
Réponses
4
Affichages
998
Yacine
Y
M
  • Question Question
XL 2021 Macro qui permette d'afficher les feuilles à partir d'une liste déroulante
Réponses
5
Affichages
1 K
MCO2406
M
Z
  • Question Question
XL 2021 VBA Prélèvement d'une donnée si une valeur recherchée est identique
Réponses
3
Affichages
651
ZiM
Z
L
  • Question Question
Microsoft 365 Faire agir une macro en fonction de l'emplacement du bouton
Réponses
2
Affichages
659
AtTheOne
R
  • Résolu(e)
XL 2019 amélioration d'une macro (actualisation auto et automatisation)
Réponses
11
Affichages
840
rh.finances
R
T
  • Résolu(e)
XL 2019 Afficher et masquer un onglet
Réponses
8
Affichages
720
telemarrk
T
F
  • Question Question
XL 2010 Appeler une macro dans une autre
Réponses
5
Affichages
719
Dranreb
  • Question Question
Microsoft 365 Exporter en PDF avec une mise en page automatique via un bouton
Réponses
8
Affichages
880
patricktoulon
L
  • Résolu(e)
XL 2016 Masquer un onglet à l'ouverture du fichier
Réponses
4
Affichages
992
Lazz
L
R
  • Résolu(e)
Microsoft 365 Insérer une copie d'un onglet dans le classeur
Réponses
2
Affichages
673
Rosco1669
R
V
  • Résolu(e)
XL 2016 Facturier : Retour à la ligne sur la facture
2
Réponses
19
Affichages
2 K
Vermithor
V
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…