XL 2013 Masquer Feuil1 si Feuil3 NON masquée

Usine à gaz · 13 Juin 2018

Bonjour à toutes et à tous,

Me re-voilou pour une nouvelle question.

Malgré mes recheches, je n'arrive pas à trouver la réponse.
Mais peut-être que ce n'est pas possible.

Ce que je voudrais faire :
Ici, je suis sur ma Feuill3

J'ai besoin que tant que je suis sur ma Feuill3, l'onglet Feuil1 ne puisse pas être sélectionné.

Auriez-vous la solution ? (petit fichier test joint)

Un grand Merci encore une fois.

Bonne journée à toutes et à tous
Amicalement,
arthour973,

Si... · 15 Juin 2018

Bon_jour

Job, je suis sourd d'une oreille et n'entends pas de l'autre 😉 donc pour arthour (qui pourra, peut-être, dormir sur ses 2 oreilles) 😵, essaye de glisser dans ThisWorkbook.

VB:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    Feuil1.Visible = 1: Feuil3.Visible = 1
    Select Case Sh.Name
        Case "Feuil1": Feuil3.Visible = 2
        Case "Feuil3": Feuil1.Visible = 2
  End Select
End Sub

Maintenant s'il y a d'autres conditions à l'ouverture des onglets non impliqués au jeu de cache -cache, ce sera un autre son de cloche.

Usine à gaz · 15 Juin 2018

Bonjour SI,

Merci d'être encore là 🙂

J'avais bien pensé que c'était dans le ThisWorkbook qu'il fallait mettre un code mais je n'ai pas su le faire.
Super, je teste et je reviens.
Amicalement,
arthour973

Usine à gaz · 15 Juin 2018

Re Si,

Après test, c'est nickel
Un grand merci à toi
Je joins le fichier test.

XL 2013 Masquer Feuil1 si Feuil3 NON masquée

Usine à gaz

XLDnaute Barbatruc

Pièces jointes

Si...

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

XL 2013 Masquer Feuil1 si Feuil3 NON masquée

Usine à gaz

XLDnaute Barbatruc

Pièces jointes

Si...

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

Privacy & Transparency

Privacy & Transparency