XL 2013 (RESOLU) Affichage du bouton selon l'événement d'une cellule

chaelie2015

XLDnaute Accro
Bonjour Forum
Dans la feuille intitulée 'type', j'ai une plage de cellules allant de GL12 à II62 nommée 'TableauRésulta_Type', une cellule de saisie en Y10, et un bouton appelé 'Effacer2_Type'.
Je suis à la recherche d'un code qui affiche le bouton dès que la cellule Y10 est modifiée. c_a_d, a chaque fois que je vide ou que je re saisis une nouvelle valeur dans la cellule Y10, le bouton doit apparaître, et une fois que je clique sur le bouton, celui-ci doit se masquer automatiquement.
le code de bouton est effacé la plage GL12 à II62.
Merci
 
Solution
Re,
Mieux compris.
Dans ce cas il ne faut pas intégrer GéreBouton dans Sub Worksheet_Change, mais simplement mettre les deux macros dans un module, voir PJ.
Par contre chaque feuille doit posséder son propre Worksheet_Change.

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Chaelie,
Un petit fichier test aurait été le bienvenu, ne serait ce que pour éviter de se le retaper ( avec un risque d'erreur ) :)
Un essai en PJ avec pour la modif de Y10:
VB:
Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, [Y10]) Is Nothing Then Shapes("Bouton").Visible = True
End Sub
Pour la gestion du bouton :
Code:
Sub GereBouton()
    [Gl12:II62].ClearContents
    Shapes("Bouton").Visible = False
End Sub
Le bouton Test ne sert à rien si ce n'est que remplir le tableau de X pour tester.
 

Pièces jointes

  • Classeur2.xlsm
    21.8 KB · Affichages: 3

chaelie2015

XLDnaute Accro
Re
Je souhaite organiser ton code de cette façon :
Copie le code
VB:
Sub GereBouton()
    [Gl12:II62].ClearContents
    Shapes("Effacer2_Type").Visible = False
End Sub
dans un module, puis ajoute 'call GereBouton' dans 'Private Sub Worksheet_Change.
ça n'a pas fonctionné ?
Merci
 

Pièces jointes

  • CHARLIE BOUTON MASQUER R SYLVANU.xlsm
    22 KB · Affichages: 2

Discussions similaires

Statistiques des forums

Discussions
312 561
Messages
2 089 667
Membres
104 251
dernier inscrit
casino.macon