macro afficher une feuille a partir d'un saisie

camarchepas

XLDnaute Barbatruc

• 23 Septembre 2014

• #2

Re : macro afficher une feuille a partir d'un saisie

Bonsoir ,

Peut être comme ceci

 

Pièces jointes

• Classeur cache cache.xlsm

  14.6 KB · Affichages: 38

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 23 Septembre 2014

• #3

Re : macro afficher une feuille a partir d'un saisie

Bonjour à tous,

Dans le module de la feuille concernée :

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$2" Then Feuil2.Visible = IIf(Feuil1.Cells(2, 2) = "Oui", True, False)
End Sub

A+ à tous

Edition : Oups !!! Pas Vu Nono. Salut...

 

Pièces jointes

• JC Affiche Masque Feuille sur Valeur.xlsm

  21.4 KB · Affichages: 29

Dernière édition: 23 Septembre 2014

Vote positif 0 Vote négatif

Z

zed9i

Guest

• 24 Septembre 2014

• #4

Re : macro afficher une feuille a partir d'un saisie

merci infiniment.
Réponses rapides et ça...fonctionne 🙂.

 

Vote positif 0 Vote négatif

Z

zed9i

Guest

• 2 Octobre 2014

• #5

Re : macro afficher une feuille a partir d'un saisie

Bonjour tout le monde

Je reviendrai vers vous sur le même sujet mais juste avec une petite modification, que je ne suis pas arrivé à ​la faire marcher.

En faite, j'ai un classeur, contenant 2 feuilles.
Etat de départ: feuille 1 apparente, feuille 2 cachée.
Scénario: le macro permet :
1/ d'afficher directement la feuille 2, quand j'écris dans la cellule B2 et la cellule C2 de la feuille 1, le mot "OUI"
2/ de rester dans son état de départ, quand j'écris dans la cellule B2 de la feuille 1, le mot "NON"

Donc pour résumer ma modification c'est sur l'étape 1 qui consiste a avoir "OUI" dans les 2 cellules​ en même temps pour afficher la feuille 2.

Je tiens a vous remercier d'avance pour votre aimable aide.

 

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 2 Octobre 2014

• #6

Re : macro afficher une feuille a partir d'un saisie

Bonjour ,

Remplacer le code dans la feuille 1 par celui ci si j'ai tout compris

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$2" Or Target.Address = "$C$2" Then
 If UCase(Range("B" & Target.Row)) = "OUI" And UCase(Range("C" & Target.Row)) = "OUI" Then
   Feuil2.Visible = True
   Feuil2.Select
  Else
   Feuil2.Visible = False
 End If
End If
End Sub

 

Vote positif 0 Vote négatif

Z

zed9i

Guest

• 2 Octobre 2014

• #7

Re : macro afficher une feuille a partir d'un saisie

Je vous remercie infiniment pour votre aide 🙂

 

Vote positif 0 Vote négatif