Apparition Bouton Sous condition
chewwe1602
Messages postés
44
Date d'inscription
Statut
Membre
Dernière intervention
-
chewwe1602 Messages postés 44 Date d'inscription Statut Membre Dernière intervention -
chewwe1602 Messages postés 44 Date d'inscription Statut Membre Dernière intervention -
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
- Bouton reinitialisation pc - Guide
- Diagnostic bouton photo - Accueil - Outils
- Bouton on/off comment savoir ✓ - Forum Matériel & Système
- Symbole arrêt marche - Forum Word
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