Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

apparition d'un bouton sous condition

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
C

chewwe1602

XLDnaute Nouveau
Bonjour,

Je travail sous Excel 2010

je n'arrive pas a faire un truc qui semble tout bête.
J'ai un tableur a plusieurs 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 résultats par rapport au deux première 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 .
 
Trier par date Trier par votes
Re : apparition d'un bouton sous condition

Bonjour, chewwe1602, le Forum,

Peut-être ainsi :

VB: 
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
    CommandButton1.Visible = [f7] = "oui"    'Merci, Si... !
End Sub
Private Sub CommandButton1_Click()
    With Sheets("Feuil2"): .Activate: .[a1].Select: End With
End Sub

A bientôt 🙂
 
Vote positif 0 Vote négatif
Re : apparition d'un bouton sous condition

Bonjour Double zero.

En fait mon code fonctionne ^^
C'est juste que dans mon menu deroulant le Oui avait une majuscule
que l'adresse de ma cellule s'ecrit aussi en maj.
Bref des erreur d'inatention.

Cependant je vais voir pour me servir de ton code dans un autre tableau parce qu’il est plus simple a écrire ^^

En tout cas merci de t’être penché sur mon cas !!! 🙂

Bonne journée.
 
Vote positif 0 Vote négatif
Re : apparition d'un bouton sous condition

Bonjour Double zero.

En fait mon code fonctionne ^^
C'est juste que dans mon menu deroulant le Oui avait une majuscule
que l'adresse de ma cellule s'ecrit aussi en maj.
Bref des erreur d'inatention.

Cependant je vais voir pour me servir de ton code dans un autre tableau parce qu’il est plus simple a écrire ^^

En tout cas merci de t’être penché sur mon cas !!! 🙂

Bonne journée.
 
Vote positif 0 Vote négatif
Re : apparition d'un bouton sous condition

Re-bonjour,

chewwe1602 à dit:
... C'est juste que dans mon menu deroulant le Oui avait une majuscule
que l'adresse de ma cellule s'ecrit aussi en maj...
Cliquez pour agrandir...

Dans ce cas, afin de ne pas distinguer les majuscules des minuscules, modifier le code comme suit :

VB: 
Option Explicit
Option Compare Text
Private Sub Worksheet_Change(ByVal Target As Range)
    CommandButton1.Visible = [f7] = "oui"
End Sub
Private Sub CommandButton1_Click()
    With Sheets("Feuil2"): .Activate: .[a1].Select: End With
End Sub

A bientôt 🙂
 
Vote positif 0 Vote négatif
Re : apparition d'un bouton sous condition

salut

Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
  CommandButton1.Visible = [f7] Like "*ui"
End Sub
Private Sub CommandButton1_Click()
  Application.Goto Sheets("Feuil2").[A1]
End Sub

Pour la première hé oui, un "Like" ,n'est-ce pas DoubleZero 😉😀, avec utilisation d'une liste de validation ( ;oui;non) comme dit précédemment
Pour la seconde hé oui, un Goto mais un peu spécial.
 
Dernière édition:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

C
  • Question Question
XL 2016 accès feuilles masquées par bouton
2
Réponses
26
Affichages
781
vgendron
M
  • Question Question
XL 2021 Fichier partagé - erreur de l'objet TextRange2
Réponses
7
Affichages
353
macseb
M
M
  • Question Question
XL 2021 macro VBA
Réponses
4
Affichages
440
ManuEven
M
J
  • Résolu(e)
XL 2021 insertion d'image provenant d'unecellule dans un userform
2
Réponses
22
Affichages
581
vgendron
  • Question Question
XL 2016 XLS - Comment déterminer les zones présentent au niveau d'une cellule ?
Réponses
2
Affichages
611
Lu76Fer
P
  • Question Question
XL 2021 Ajout/adaptation de code VBA sur feuille qui en contient déjà
Réponses
3
Affichages
344
Pierreavecunp
P
C
  • Question Question
XL 2021 VBA excel
Réponses
4
Affichages
371
CDALE
C
N
  • Question Question
Microsoft 365 appel des sous-routine
Réponses
3
Affichages
353
Dranreb
N
  • Question Question
Autres bouton d'action sous excel
Réponses
6
Affichages
452
wDog66
C
  • Résolu(e)
XL 2016 Répartir dans des Groupes d'Effectifs Aléatoires ... mais pas trop
Réponses
2
Affichages
503
crocrocro
C
  • Résolu(e)
XL 2019 Erreur dans ma macro
Réponses
9
Affichages
730
Nadou69
N
  • Résolu(e)
Microsoft 365 Transfère de données d'un Userform vers un tableau structuré d'une feuille de calcul
Réponses
4
Affichages
403
NONO14
N
  • Résolu(e)
Microsoft 365 Déplacement Shape
Réponses
2
Affichages
299
Cédric06400
G
  • Résolu(e)
XL 2010 Obliger la validation d'un bouton d'option.
Réponses
8
Affichages
468
gillesda
G
XLS : Evènements souris 'click' sur la grille & astuces
Réponses
3
Affichages
405
Lu76Fer
N
  • Question Question
LibreOffice Calc LibreOffice cal probleme pour effacer colonne
Réponses
1
Affichages
265
Staple1600
U
  • Question Question
Autres incorporer une macro dans une autre macro
Réponses
5
Affichages
669
Phil69970
K
  • Résolu(e)
XL 2016 Affichage TextBox
Réponses
6
Affichages
628
KRUG WOO
K
M
  • Question Question
XL 2013 Création d'un bouton reset,segment et tcd vidé
Réponses
1
Affichages
708
Compte Supprimé 979
C
L
  • Question Question
Microsoft 365 Faire agir une macro en fonction de l'emplacement du bouton
Réponses
2
Affichages
585
AtTheOne
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…