Bouton 2 fonctions

Résolu/Fermé
lapanne - 23 juil. 2011 à 16:59
melanie1324 Messages postés 1505 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 - 28 juil. 2011 à 08:29
Bonjour,
Débutant sous excel, je tourne en rond.
j'ai créé un dossier de 3 feuilles,dans la premiere( page de garde) je rentre des données qui doivent me servir à choisir une des 2 autres feuilles.
Ces données donnent une valeur "VRAI ou FAUX" dans la cellule "j52" de la premiere page.
Sur la premiere page, je souhaiterai que lorsque la valeur de la cellule "j52" = vrai lorsque je clique sur le bouton"CONTINUER" la feuil 2 s'ouvre et lorsque la valeur de "j52" = faux se soit la feuille 3.
cela est il possible.
merci d'avance

A voir également:

4 réponses

melanie1324 Messages postés 1505 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 154
25 juil. 2011 à 14:54
bonjour,

c'est possible.

Dans le code de ton bouton "continuer", tu mets :
if cells(52,10).value = false then
sheets("Feuil3").select
else
sheets("Feuil2").select
end if
0
bonjour
merci pour la reponse, mais je rencontre un probleme, je n'ai que la feuille 3 qui s'ouvre.
voici le code tel que je l'ai ecris (j'ai juste modifier les coordonnées de la cellule):

Private Sub CommandButton1_Click()
If Cells(52, 11).Value = False Then
Sheets("Feuil2").Select
Else
Sheets("Feuil3").Select
End If
End Sub

j'ai inversé le numero des feuilles, et dans ce cas là, j'ouvre la feuille 2, mais pas la feuille 3.
par contre je ne comprends pas dans le code comment est pris en compte la valeur de cellule Vrai ou Faux
0
melanie1324 Messages postés 1505 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 154
26 juil. 2011 à 08:33
Bonjour,

voici ce que signifie le code :

Private Sub CommandButton1_Click()
If Cells(52, 11).Value = False Then 'si la cellule de la ligne 52 et de la colonne 11 a pour valeur "Faux"
Sheets("Feuil2").Select 'on ouvre la feuille qui s'intitule Feuille2
Else
Sheets("Feuil3").Select 'sinon on ouvre la feuille qui s'intitule Feuille 3
End If
End Sub
0
bonjour melanie
je te remercie pour les explications , tout fonctionne

merci à bientôt
0
melanie1324 Messages postés 1505 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 154
28 juil. 2011 à 08:29
Peux tu juste le mettre à résolu stp (en dessous de ton titre)
0