Bonjour,
J'ai une cellule qui peut prendre 3 valeurs différentes, par exemple
"armoire" ou
"table" ou
"chaise"
A coté de cette cellulle j'ai mis un bouton et j'aimerais que l'activation
de ce bouton me fasse sauter à la feuille "x" si le cellule contient armoire
ou "y" si elle contient table ou à la feuille z si le cellule vaut chaise.
Quel code faut'il mettre sur ce bouton ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Rai
Bonjour,
Si on considère que la cellule B12 contient ton choix de valeur, copie le code ci-dessous dans un module du VBE affecte la macro 'saut' au bouton concerné
Sub saut() Select Case [B12] Case "armoire" nvfeuille$ = "x" Case "table" nvfeuille$ = "y" Case "chaise" nvfeuille$ = "z" End Select
Sheets(nvfeuille).Activate End Sub
Et voilà
Bonne Aprèm
Rai
Bonjour, J'ai une cellule qui peut prendre 3 valeurs différentes, par exemple "armoire" ou "table" ou "chaise" A coté de cette cellulle j'ai mis un bouton et j'aimerais que l'activation de ce bouton me fasse sauter à la feuille "x" si le cellule contient armoire ou "y" si elle contient table ou à la feuille z si le cellule vaut chaise. Quel code faut'il mettre sur ce bouton ?
Merci de votre aide
Jean-Pierre
Bonjour,
Si on considère que la cellule B12 contient ton choix de valeur,
copie le code ci-dessous dans un module du VBE
affecte la macro 'saut' au bouton concerné
Sub saut()
Select Case [B12]
Case "armoire"
nvfeuille$ = "x"
Case "table"
nvfeuille$ = "y"
Case "chaise"
nvfeuille$ = "z"
End Select
Sheets(nvfeuille).Activate
End Sub
Et voilà
Bonne Aprèm
Rai
Bonjour,
J'ai une cellule qui peut prendre 3 valeurs différentes, par exemple
"armoire" ou
"table" ou
"chaise"
A coté de cette cellulle j'ai mis un bouton et j'aimerais que l'activation
de ce bouton me fasse sauter à la feuille "x" si le cellule contient armoire
ou "y" si elle contient table ou à la feuille z si le cellule vaut chaise.
Quel code faut'il mettre sur ce bouton ?
Si on considère que la cellule B12 contient ton choix de valeur, copie le code ci-dessous dans un module du VBE affecte la macro 'saut' au bouton concerné
Sub saut() Select Case [B12] Case "armoire" nvfeuille$ = "x" Case "table" nvfeuille$ = "y" Case "chaise" nvfeuille$ = "z" End Select
Sheets(nvfeuille).Activate End Sub
Et voilà
Bonne Aprèm
Rai
Bonjour, J'ai une cellule qui peut prendre 3 valeurs différentes, par exemple "armoire" ou "table" ou "chaise" A coté de cette cellulle j'ai mis un bouton et j'aimerais que l'activation de ce bouton me fasse sauter à la feuille "x" si le cellule contient armoire ou "y" si elle contient table ou à la feuille z si le cellule vaut chaise. Quel code faut'il mettre sur ce bouton ?
Merci de votre aide
Jean-Pierre
Pounet95
Bonjour, Quelle que soit l'origine du bouton ( barre outils Contrôles ou barre outils Formulaire )
1er cas , visulaliser le code du bouton et coller ce qui suit entre Sub et End Sub 2ème cas , clic droit et affecter une macro et coller de même.
Select Case [A1] Case "armoire" Sheets("feuil1").Select Case "table" Sheets("feuil2").Select Case "chaise" Sheets("feuil3").Select Case Else 'on reste où on est !!!! End Select
-- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/ Conseillé : http://dj.joss.free.fr/netiquet.htm (charte, nétiquette, conseils, abréviations, souriettes...) http://www.excelabo.net/mpfe/connexion.php (connexion, conseils...)
"JPB" a écrit dans le message de news:
Bonjour, J'ai une cellule qui peut prendre 3 valeurs différentes, par exemple "armoire" ou "table" ou "chaise" A coté de cette cellulle j'ai mis un bouton et j'aimerais que l'activation de ce bouton me fasse sauter à la feuille "x" si le cellule contient armoire ou "y" si elle contient table ou à la feuille z si le cellule vaut chaise. Quel code faut'il mettre sur ce bouton ?
Merci de votre aide
Jean-Pierre
Bonjour,
Quelle que soit l'origine du bouton ( barre outils Contrôles ou barre outils
Formulaire )
1er cas , visulaliser le code du bouton et coller ce qui suit entre Sub et
End Sub
2ème cas , clic droit et affecter une macro et coller de même.
Select Case [A1]
Case "armoire"
Sheets("feuil1").Select
Case "table"
Sheets("feuil2").Select
Case "chaise"
Sheets("feuil3").Select
Case Else
'on reste où on est !!!!
End Select
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"JPB" <baechliJP@constel.ch> a écrit dans le message de news:
OpFdnqRCFHA.3416@TK2MSFTNGP09.phx.gbl...
Bonjour,
J'ai une cellule qui peut prendre 3 valeurs différentes, par exemple
"armoire" ou
"table" ou
"chaise"
A coté de cette cellulle j'ai mis un bouton et j'aimerais que l'activation
de ce bouton me fasse sauter à la feuille "x" si le cellule contient
armoire
ou "y" si elle contient table ou à la feuille z si le cellule vaut chaise.
Quel code faut'il mettre sur ce bouton ?
Bonjour, Quelle que soit l'origine du bouton ( barre outils Contrôles ou barre outils Formulaire )
1er cas , visulaliser le code du bouton et coller ce qui suit entre Sub et End Sub 2ème cas , clic droit et affecter une macro et coller de même.
Select Case [A1] Case "armoire" Sheets("feuil1").Select Case "table" Sheets("feuil2").Select Case "chaise" Sheets("feuil3").Select Case Else 'on reste où on est !!!! End Select
-- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/ Conseillé : http://dj.joss.free.fr/netiquet.htm (charte, nétiquette, conseils, abréviations, souriettes...) http://www.excelabo.net/mpfe/connexion.php (connexion, conseils...)
"JPB" a écrit dans le message de news:
Bonjour, J'ai une cellule qui peut prendre 3 valeurs différentes, par exemple "armoire" ou "table" ou "chaise" A coté de cette cellulle j'ai mis un bouton et j'aimerais que l'activation de ce bouton me fasse sauter à la feuille "x" si le cellule contient armoire ou "y" si elle contient table ou à la feuille z si le cellule vaut chaise. Quel code faut'il mettre sur ce bouton ?
Merci de votre aide
Jean-Pierre
JPB
C'est testé, Cela marche, C'est exactement ce que je cherchais...
Merci à tous, je reviendrai
Jean-Pierre
a écrit dans le message de news:%23$
Bonjour, Quelle que soit l'origine du bouton ( barre outils Contrôles ou barre outils
Formulaire )
1er cas , visulaliser le code du bouton et coller ce qui suit entre Sub et End Sub 2ème cas , clic droit et affecter une macro et coller de même.
Select Case [A1] Case "armoire" Sheets("feuil1").Select Case "table" Sheets("feuil2").Select Case "chaise" Sheets("feuil3").Select Case Else 'on reste où on est !!!! End Select
-- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/ Conseillé : http://dj.joss.free.fr/netiquet.htm (charte, nétiquette, conseils, abréviations, souriettes...) http://www.excelabo.net/mpfe/connexion.php (connexion, conseils...)
"JPB" a écrit dans le message de news:
Bonjour, J'ai une cellule qui peut prendre 3 valeurs différentes, par exemple "armoire" ou "table" ou "chaise" A coté de cette cellulle j'ai mis un bouton et j'aimerais que l'activation
de ce bouton me fasse sauter à la feuille "x" si le cellule contient armoire ou "y" si elle contient table ou à la feuille z si le cellule vaut chaise.
Quel code faut'il mettre sur ce bouton ?
Merci de votre aide
Jean-Pierre
C'est testé,
Cela marche,
C'est exactement ce que je cherchais...
Merci à tous, je reviendrai
Jean-Pierre
<pasdepub@oneado.fr> a écrit dans le message de
news:%23$JffDSCFHA.1400@TK2MSFTNGP11.phx.gbl...
Bonjour,
Quelle que soit l'origine du bouton ( barre outils Contrôles ou barre
outils
Formulaire )
1er cas , visulaliser le code du bouton et coller ce qui suit entre Sub et
End Sub
2ème cas , clic droit et affecter une macro et coller de même.
Select Case [A1]
Case "armoire"
Sheets("feuil1").Select
Case "table"
Sheets("feuil2").Select
Case "chaise"
Sheets("feuil3").Select
Case Else
'on reste où on est !!!!
End Select
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"JPB" <baechliJP@constel.ch> a écrit dans le message de news:
OpFdnqRCFHA.3416@TK2MSFTNGP09.phx.gbl...
Bonjour,
J'ai une cellule qui peut prendre 3 valeurs différentes, par exemple
"armoire" ou
"table" ou
"chaise"
A coté de cette cellulle j'ai mis un bouton et j'aimerais que
l'activation
de ce bouton me fasse sauter à la feuille "x" si le cellule contient
armoire
ou "y" si elle contient table ou à la feuille z si le cellule vaut
chaise.
C'est testé, Cela marche, C'est exactement ce que je cherchais...
Merci à tous, je reviendrai
Jean-Pierre
a écrit dans le message de news:%23$
Bonjour, Quelle que soit l'origine du bouton ( barre outils Contrôles ou barre outils
Formulaire )
1er cas , visulaliser le code du bouton et coller ce qui suit entre Sub et End Sub 2ème cas , clic droit et affecter une macro et coller de même.
Select Case [A1] Case "armoire" Sheets("feuil1").Select Case "table" Sheets("feuil2").Select Case "chaise" Sheets("feuil3").Select Case Else 'on reste où on est !!!! End Select
-- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/ Conseillé : http://dj.joss.free.fr/netiquet.htm (charte, nétiquette, conseils, abréviations, souriettes...) http://www.excelabo.net/mpfe/connexion.php (connexion, conseils...)
"JPB" a écrit dans le message de news:
Bonjour, J'ai une cellule qui peut prendre 3 valeurs différentes, par exemple "armoire" ou "table" ou "chaise" A coté de cette cellulle j'ai mis un bouton et j'aimerais que l'activation
de ce bouton me fasse sauter à la feuille "x" si le cellule contient armoire ou "y" si elle contient table ou à la feuille z si le cellule vaut chaise.
