ActiveSheet.Shapes("Bouton 2").Hide peut-être ? non testé.
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner le statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer non-visible Et que si le cellule J3 affiche Order le bouton "Ordered" soit le seul visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons il faut mieux utiliser Cleracile qu'un foulard aura droit à un sourire (sans boutons)
J'espère avoir été assez clair
A bientôt
Rex ;-))
Et bon dimanche à vous
Rex
Bonjour et merci pour la réponse
Mais (et on me le dit tellement souvent) je m'explique mal
Cacher les bouton cela devrait fonctionner avec ce que tu dis MAIS Ce que je veux en plus est que est que seul un bouton soit visible et en fonction de ce qui est affiché dans la cellule J3
Une transaction suit une serie d'étapes
Offre, Order, Ordered, Delivered, Invoiced, Paid
Et si j'affiche ceux qui sont à l'étape Ordered, je voudrais que seul le bouton Delivered soit visible
Est-ce plus clair ainsi?
A bientôt et encore merci
Rex
"Patrick BASTARD" a écrit dans le message de news:
Bonjour, *Rex*
ActiveSheet.Shapes("Bouton 2").Hide peut-être ? non testé.
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner le statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer non-visible Et que si le cellule J3 affiche Order le bouton "Ordered" soit le seul visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons il faut mieux utiliser Cleracile qu'un foulard aura droit à un sourire (sans boutons)
J'espère avoir été assez clair
A bientôt
Rex ;-))
Et bon dimanche à vous
Bonjour et merci pour la réponse
Mais (et on me le dit tellement souvent) je m'explique mal
Cacher les bouton cela devrait fonctionner avec ce que tu dis
MAIS
Ce que je veux en plus est que
est que seul un bouton soit visible et en fonction de ce qui est affiché
dans la cellule J3
Une transaction suit une serie d'étapes
Offre, Order, Ordered, Delivered, Invoiced, Paid
Et si j'affiche ceux qui sont à l'étape Ordered, je voudrais que seul le
bouton Delivered soit visible
Est-ce plus clair ainsi?
A bientôt et encore merci
Rex
"Patrick BASTARD" <pasdespambastardp@freepasdespam.fr> a écrit dans le
message de news: OTrmFA95HHA.1208@TK2MSFTNGP03.phx.gbl...
Bonjour, *Rex*
ActiveSheet.Shapes("Bouton 2").Hide
peut-être ?
non testé.
--
Bien amicordialement,
P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner le
statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une
transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit
affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer non-visible
Et que si le cellule J3 affiche Order le bouton "Ordered" soit le seul
visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons
il faut mieux utiliser Cleracile qu'un foulard aura droit à un
sourire (sans boutons)
Mais (et on me le dit tellement souvent) je m'explique mal
Cacher les bouton cela devrait fonctionner avec ce que tu dis MAIS Ce que je veux en plus est que est que seul un bouton soit visible et en fonction de ce qui est affiché dans la cellule J3
Une transaction suit une serie d'étapes
Offre, Order, Ordered, Delivered, Invoiced, Paid
Et si j'affiche ceux qui sont à l'étape Ordered, je voudrais que seul le bouton Delivered soit visible
Est-ce plus clair ainsi?
A bientôt et encore merci
Rex
"Patrick BASTARD" a écrit dans le message de news:
Bonjour, *Rex*
ActiveSheet.Shapes("Bouton 2").Hide peut-être ? non testé.
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner le statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer non-visible Et que si le cellule J3 affiche Order le bouton "Ordered" soit le seul visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons il faut mieux utiliser Cleracile qu'un foulard aura droit à un sourire (sans boutons)
J'espère avoir été assez clair
A bientôt
Rex ;-))
Et bon dimanche à vous
Patrick BASTARD
Bonjour, *Rex*
Merci de bien vouloir mettre ma précédente intervention aux orties.
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner le statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer non-visible Et que si le cellule J3 affiche Order le bouton "Ordered" soit le seul visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons il faut mieux utiliser Cleracile qu'un foulard aura droit à un sourire (sans boutons)
J'espère avoir été assez clair
A bientôt
Rex ;-))
Et bon dimanche à vous
Bonjour, *Rex*
Merci de bien vouloir mettre ma précédente intervention aux orties.
--
Bien amicordialement,
P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner le
statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une
transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit
affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer non-visible
Et que si le cellule J3 affiche Order le bouton "Ordered" soit le seul
visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons
il faut mieux utiliser Cleracile qu'un foulard aura droit à un
sourire (sans boutons)
Merci de bien vouloir mettre ma précédente intervention aux orties.
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner le statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer non-visible Et que si le cellule J3 affiche Order le bouton "Ordered" soit le seul visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons il faut mieux utiliser Cleracile qu'un foulard aura droit à un sourire (sans boutons)
J'espère avoir été assez clair
A bientôt
Rex ;-))
Et bon dimanche à vous
Patrick BASTARD
Bonjour, *Rex*
Pourquoi plusieurs boutons ?
Tu devrais t'en sortir avec un select case et l'affectation de la macro idoine en fonction de la valeur en J3 : ActiveSheet.Shapes("Button 1").Select With Selection .OnAction = "Macro1" .Characters.Text = "Offre" End With
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour et merci pour la réponse
Mais (et on me le dit tellement souvent) je m'explique mal
Cacher les bouton cela devrait fonctionner avec ce que tu dis MAIS Ce que je veux en plus est que est que seul un bouton soit visible et en fonction de ce qui est affiché dans la cellule J3
Une transaction suit une serie d'étapes
Offre, Order, Ordered, Delivered, Invoiced, Paid
Et si j'affiche ceux qui sont à l'étape Ordered, je voudrais que seul le bouton Delivered soit visible
Est-ce plus clair ainsi?
A bientôt et encore merci
Rex
"Patrick BASTARD" a écrit dans le message de news:
Bonjour, *Rex*
ActiveSheet.Shapes("Bouton 2").Hide peut-être ? non testé.
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner le statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer non-visible Et que si le cellule J3 affiche Order le bouton "Ordered" soit le seul visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons il faut mieux utiliser Cleracile qu'un foulard aura droit à un sourire (sans boutons)
J'espère avoir été assez clair
A bientôt
Rex ;-))
Et bon dimanche à vous
Bonjour, *Rex*
Pourquoi plusieurs boutons ?
Tu devrais t'en sortir avec un select case et l'affectation de la macro
idoine en fonction de la valeur en J3 :
ActiveSheet.Shapes("Button 1").Select
With Selection
.OnAction = "Macro1"
.Characters.Text = "Offre"
End With
--
Bien amicordialement,
P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour et merci pour la réponse
Mais (et on me le dit tellement souvent) je m'explique mal
Cacher les bouton cela devrait fonctionner avec ce que tu dis
MAIS
Ce que je veux en plus est que
est que seul un bouton soit visible et en fonction de ce qui est
affiché dans la cellule J3
Une transaction suit une serie d'étapes
Offre, Order, Ordered, Delivered, Invoiced, Paid
Et si j'affiche ceux qui sont à l'étape Ordered, je voudrais que seul
le bouton Delivered soit visible
Est-ce plus clair ainsi?
A bientôt et encore merci
Rex
"Patrick BASTARD" <pasdespambastardp@freepasdespam.fr> a écrit dans le
message de news: OTrmFA95HHA.1208@TK2MSFTNGP03.phx.gbl...
Bonjour, *Rex*
ActiveSheet.Shapes("Bouton 2").Hide
peut-être ?
non testé.
--
Bien amicordialement,
P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner
le statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une
transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit
affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer
non-visible Et que si le cellule J3 affiche Order le bouton
"Ordered" soit le seul visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons
il faut mieux utiliser Cleracile qu'un foulard aura droit à un
sourire (sans boutons)
Tu devrais t'en sortir avec un select case et l'affectation de la macro idoine en fonction de la valeur en J3 : ActiveSheet.Shapes("Button 1").Select With Selection .OnAction = "Macro1" .Characters.Text = "Offre" End With
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour et merci pour la réponse
Mais (et on me le dit tellement souvent) je m'explique mal
Cacher les bouton cela devrait fonctionner avec ce que tu dis MAIS Ce que je veux en plus est que est que seul un bouton soit visible et en fonction de ce qui est affiché dans la cellule J3
Une transaction suit une serie d'étapes
Offre, Order, Ordered, Delivered, Invoiced, Paid
Et si j'affiche ceux qui sont à l'étape Ordered, je voudrais que seul le bouton Delivered soit visible
Est-ce plus clair ainsi?
A bientôt et encore merci
Rex
"Patrick BASTARD" a écrit dans le message de news:
Bonjour, *Rex*
ActiveSheet.Shapes("Bouton 2").Hide peut-être ? non testé.
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner le statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer non-visible Et que si le cellule J3 affiche Order le bouton "Ordered" soit le seul visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons il faut mieux utiliser Cleracile qu'un foulard aura droit à un sourire (sans boutons)
J'espère avoir été assez clair
A bientôt
Rex ;-))
Et bon dimanche à vous
Rex
Bonjour et merci
Mais (sorry) je ne comprends pas ;-((???????
Moi, je suis parti avec la macro tout en fin de message, mais il ne fait pas ce que je veux Dans cette macro seul les lignes dont la cellule de la colonne H contenant le texte "Ordered to Prom" devraient être visibles Mais ça ne donne pas tout à fait ça
Alors j'ai essayé faire ceci, qui aurait du fonctionner, mais qui coince Ce que j'aurais voulu est un truc dans le genre
Sub Montre_moi() Range([H2], [H185]).EntireRow.Hide For Each c In Range([H2], [H185]) c.EntireRow.Show = (c.Value = "Offer")
Next c Application.ScreenUpdating = True Application.EnableEvents = True ' Secours pour réparer un éventuel arrêt du code Worksheet_Change() End Sub
Mais ceci ne fonctionne pas du tout Il me mets des Compile error à chaque coups ;-(((((
A bientôt
Rex
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Sub SelectStatus() Application.ScreenUpdating = False Range([H2], [H185]).EntireRow.Show For Each c In Range([H2], [H185]) c.EntireRow.Hidden = (c.Value = "Offer") c.EntireRow.Hidden = (c.Value = "Ordered") c.EntireRow.Hidden = (c.Value = "Ordered to Promethean") c.EntireRow.Hidden = (c.Value = "Invoice Requested") c.EntireRow.Hidden = (c.Value = "Invoiced") c.EntireRow.Hidden = (c.Value = "Paid")
Next c Application.ScreenUpdating = True Application.EnableEvents = True ' Secours pour réparer un éventuel arrêt du code Worksheet_Change() ' End Sub
"Patrick BASTARD" a écrit dans le message de news:
Bonjour, *Rex*
Pourquoi plusieurs boutons ?
Tu devrais t'en sortir avec un select case et l'affectation de la macro idoine en fonction de la valeur en J3 : ActiveSheet.Shapes("Button 1").Select With Selection .OnAction = "Macro1" .Characters.Text = "Offre" End With
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour et merci pour la réponse
Mais (et on me le dit tellement souvent) je m'explique mal
Cacher les bouton cela devrait fonctionner avec ce que tu dis MAIS Ce que je veux en plus est que est que seul un bouton soit visible et en fonction de ce qui est affiché dans la cellule J3
Une transaction suit une serie d'étapes
Offre, Order, Ordered, Delivered, Invoiced, Paid
Et si j'affiche ceux qui sont à l'étape Ordered, je voudrais que seul le bouton Delivered soit visible
Est-ce plus clair ainsi?
A bientôt et encore merci
Rex
"Patrick BASTARD" a écrit dans le message de news:
Bonjour, *Rex*
ActiveSheet.Shapes("Bouton 2").Hide peut-être ? non testé.
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner le statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer non-visible Et que si le cellule J3 affiche Order le bouton "Ordered" soit le seul visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons il faut mieux utiliser Cleracile qu'un foulard aura droit à un sourire (sans boutons)
J'espère avoir été assez clair
A bientôt
Rex ;-))
Et bon dimanche à vous
Bonjour et merci
Mais (sorry) je ne comprends pas ;-((???????
Moi, je suis parti avec la macro tout en fin de message, mais il ne fait pas
ce que je veux
Dans cette macro seul les lignes dont la cellule de la colonne H contenant
le texte "Ordered to Prom"
devraient être visibles
Mais ça ne donne pas tout à fait ça
Alors j'ai essayé faire ceci, qui aurait du fonctionner, mais qui coince
Ce que j'aurais voulu est un truc dans le genre
Sub Montre_moi()
Range([H2], [H185]).EntireRow.Hide
For Each c In Range([H2], [H185])
c.EntireRow.Show = (c.Value = "Offer")
Next c
Application.ScreenUpdating = True
Application.EnableEvents = True ' Secours pour réparer un éventuel
arrêt du code Worksheet_Change()
End Sub
Mais ceci ne fonctionne pas du tout
Il me mets des Compile error à chaque coups ;-(((((
A bientôt
Rex
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Sub SelectStatus()
Application.ScreenUpdating = False
Range([H2], [H185]).EntireRow.Show
For Each c In Range([H2], [H185])
c.EntireRow.Hidden = (c.Value = "Offer")
c.EntireRow.Hidden = (c.Value = "Ordered")
c.EntireRow.Hidden = (c.Value = "Ordered to Promethean")
c.EntireRow.Hidden = (c.Value = "Invoice Requested")
c.EntireRow.Hidden = (c.Value = "Invoiced")
c.EntireRow.Hidden = (c.Value = "Paid")
Next c
Application.ScreenUpdating = True
Application.EnableEvents = True ' Secours pour réparer un éventuel
arrêt du code Worksheet_Change()
'
End Sub
"Patrick BASTARD" <pasdespambastardp@freepasdespam.fr> a écrit dans le
message de news: unNmrP95HHA.1204@TK2MSFTNGP03.phx.gbl...
Bonjour, *Rex*
Pourquoi plusieurs boutons ?
Tu devrais t'en sortir avec un select case et l'affectation de la macro
idoine en fonction de la valeur en J3 :
ActiveSheet.Shapes("Button 1").Select
With Selection
.OnAction = "Macro1"
.Characters.Text = "Offre"
End With
--
Bien amicordialement,
P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour et merci pour la réponse
Mais (et on me le dit tellement souvent) je m'explique mal
Cacher les bouton cela devrait fonctionner avec ce que tu dis
MAIS
Ce que je veux en plus est que
est que seul un bouton soit visible et en fonction de ce qui est
affiché dans la cellule J3
Une transaction suit une serie d'étapes
Offre, Order, Ordered, Delivered, Invoiced, Paid
Et si j'affiche ceux qui sont à l'étape Ordered, je voudrais que seul
le bouton Delivered soit visible
Est-ce plus clair ainsi?
A bientôt et encore merci
Rex
"Patrick BASTARD" <pasdespambastardp@freepasdespam.fr> a écrit dans le
message de news: OTrmFA95HHA.1208@TK2MSFTNGP03.phx.gbl...
Bonjour, *Rex*
ActiveSheet.Shapes("Bouton 2").Hide
peut-être ?
non testé.
--
Bien amicordialement,
P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner
le statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une
transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit
affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer
non-visible Et que si le cellule J3 affiche Order le bouton
"Ordered" soit le seul visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons
il faut mieux utiliser Cleracile qu'un foulard aura droit à un
sourire (sans boutons)
Moi, je suis parti avec la macro tout en fin de message, mais il ne fait pas ce que je veux Dans cette macro seul les lignes dont la cellule de la colonne H contenant le texte "Ordered to Prom" devraient être visibles Mais ça ne donne pas tout à fait ça
Alors j'ai essayé faire ceci, qui aurait du fonctionner, mais qui coince Ce que j'aurais voulu est un truc dans le genre
Sub Montre_moi() Range([H2], [H185]).EntireRow.Hide For Each c In Range([H2], [H185]) c.EntireRow.Show = (c.Value = "Offer")
Next c Application.ScreenUpdating = True Application.EnableEvents = True ' Secours pour réparer un éventuel arrêt du code Worksheet_Change() End Sub
Mais ceci ne fonctionne pas du tout Il me mets des Compile error à chaque coups ;-(((((
A bientôt
Rex
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Sub SelectStatus() Application.ScreenUpdating = False Range([H2], [H185]).EntireRow.Show For Each c In Range([H2], [H185]) c.EntireRow.Hidden = (c.Value = "Offer") c.EntireRow.Hidden = (c.Value = "Ordered") c.EntireRow.Hidden = (c.Value = "Ordered to Promethean") c.EntireRow.Hidden = (c.Value = "Invoice Requested") c.EntireRow.Hidden = (c.Value = "Invoiced") c.EntireRow.Hidden = (c.Value = "Paid")
Next c Application.ScreenUpdating = True Application.EnableEvents = True ' Secours pour réparer un éventuel arrêt du code Worksheet_Change() ' End Sub
"Patrick BASTARD" a écrit dans le message de news:
Bonjour, *Rex*
Pourquoi plusieurs boutons ?
Tu devrais t'en sortir avec un select case et l'affectation de la macro idoine en fonction de la valeur en J3 : ActiveSheet.Shapes("Button 1").Select With Selection .OnAction = "Macro1" .Characters.Text = "Offre" End With
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour et merci pour la réponse
Mais (et on me le dit tellement souvent) je m'explique mal
Cacher les bouton cela devrait fonctionner avec ce que tu dis MAIS Ce que je veux en plus est que est que seul un bouton soit visible et en fonction de ce qui est affiché dans la cellule J3
Une transaction suit une serie d'étapes
Offre, Order, Ordered, Delivered, Invoiced, Paid
Et si j'affiche ceux qui sont à l'étape Ordered, je voudrais que seul le bouton Delivered soit visible
Est-ce plus clair ainsi?
A bientôt et encore merci
Rex
"Patrick BASTARD" a écrit dans le message de news:
Bonjour, *Rex*
ActiveSheet.Shapes("Bouton 2").Hide peut-être ? non testé.
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bonjour à toutes et tous
Y a-t-il moyen de de rendre un bouton invisible et visible?
J'essssssssssssssssplique
J'ai une petite macro (merci trirème) qui me permet de sélectionner le statut
ce statut varie de "Order" jusqu'à "Paid"
Et j'ai une série de bouton qui me permettent de passer une transaction d'un statut à l'autre
Ce que je voudrais est que seul le bouton du statut suivant soit affiché, et que les autres soit cachés
Donc je voudrais dans les propriétés du bouton le déclarer non-visible Et que si le cellule J3 affiche Order le bouton "Ordered" soit le seul visible
Est-ce possible?
Et le premier qui me dit que pour cacher les boutons il faut mieux utiliser Cleracile qu'un foulard aura droit à un sourire (sans boutons)
