Apparition Bouton Sous condition
chewwe1602
Messages postés
49
Statut
Membre
-
chewwe1602 Messages postés 49 Statut Membre -
chewwe1602 Messages postés 49 Statut Membre -
Bonjour,
Je travail sous Excel 2010
je n'arrive pas a faire un truc qui semble tout bete.
J'ai un tableur a plusieur feuille.
Dans la première je rentre différent paramètre. dans la seconde feuille un autre type de paramètre. et dans la troisième feuille j'ai des resultat par rapport au deux premiere feuille.
Je voudrais que quand dans ma feuille 1 cellule f7 j'ai selectionné "oui" ( il y a trois choix possible : " ", "oui", "non".
il apparaisse mon bouton contrôle activix nommé " allé en feuille 2" . Et que lorsque je clique dessus, Je passe en feuille 2 cellule A1
J'ai essayé ceci
privat sub worksheet- change(ByVal Target As Range)
if.target.address <> "$f$7" then exit sub
if.target.value = "oui" then me.commandbutton1.visible = true
if.target.value <> "oui" then me.commandbutton1.visible = false
endsub
private sub commandbutton1_click()
sheets ("feuil 2").select
end sub
Biensur cela ne fonctionne pas vraiment. Le bouton est toujours apparent mais quand je clic dessus ca m'envoie bien en feuille 2
Ou est ce que ca pèche?
Merci de votre aide .
Je travail sous Excel 2010
je n'arrive pas a faire un truc qui semble tout bete.
J'ai un tableur a plusieur feuille.
Dans la première je rentre différent paramètre. dans la seconde feuille un autre type de paramètre. et dans la troisième feuille j'ai des resultat par rapport au deux premiere feuille.
Je voudrais que quand dans ma feuille 1 cellule f7 j'ai selectionné "oui" ( il y a trois choix possible : " ", "oui", "non".
il apparaisse mon bouton contrôle activix nommé " allé en feuille 2" . Et que lorsque je clique dessus, Je passe en feuille 2 cellule A1
J'ai essayé ceci
privat sub worksheet- change(ByVal Target As Range)
if.target.address <> "$f$7" then exit sub
if.target.value = "oui" then me.commandbutton1.visible = true
if.target.value <> "oui" then me.commandbutton1.visible = false
endsub
private sub commandbutton1_click()
sheets ("feuil 2").select
end sub
Biensur cela ne fonctionne pas vraiment. Le bouton est toujours apparent mais quand je clic dessus ca m'envoie bien en feuille 2
Ou est ce que ca pèche?
Merci de votre aide .
A voir également:
- Apparition Bouton Sous condition
- Excel cellule couleur si condition texte - Guide
- Diagnostic bouton photo - Accueil - Outils
- Bouton shift pc - Forum Jeux vidéo
- Bouton on/off comment savoir - Forum Word
- Réinitialiser chromecast sans bouton - Guide
3 réponses
Bonjour,
Essaies plutôt avec la propriété "enabled"
Michel
Essaies plutôt avec la propriété "enabled"
Private Sub Worksheet_Change(ByVal Target As Range)
CommandButton1.Enabled = False
If Target.Address = "$F$7" And Target = "oui" Then CommandButton1.Enabled = True
End Sub
Michel