Discussion :

[alex_95]

Bonjour,

Voila, j'ai deja reussi à le faire mais aujourd'hui, c'est sans succès...

En effet, je veux connaitre le nom du CommandButton sur lequel je clique (ce dernier n'est pas sur un Userform mais sur une feuille excel)

J ai fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

nom_bouton = Activecontrol.name

Mais j obtiens un message d'erreur : Objet requis.
J ai beau bidouiller je n'arrive pas à m en sortir.

Qqn à 1 idée ?

Merci d avance

[zazaraignée]

Salut

Soit tu mets le code directement dans l'événement Click du bouton (ou encore l'événement GotFocus), soit tu interroge la collection des objets Shapes pour savoir lequel correspond à ActiveControl et tu récupère la propriété Name de l'objet Shapes(indice).

Je suis en mode multitasking (je joue avec ma fiille de 4 ans), je n'ai pas le temps de tester... maintenant.

[alex_95]

C'est ce que j ai fait, jusque la j ai mis le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

nom_bouton = activecontrol.name

dans l'evenement Click du CommandButton...

Ce qui me donne le message suivant : "Objet requis"

[zazaraignée]

Je n'ai pas testé autre chose qu'avec l'événement Click.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Option Explicit
Dim boutonActif As String
 
Private Sub Bouton1_Click()
    boutonActif = "Bouton1"
    ActiveCell.Value = boutonActif
    ActiveCell.Offset(1, 0).Select
End Sub
 
Private Sub Bouton2_Click()
    boutonActif = "Bouton2"
    ActiveCell.Value = boutonActif
    ActiveCell.Offset(1, 0).Select
End Sub
 
Private Sub Bouton3_Click()
    boutonActif = "Bouton3"
    ActiveCell.Value = boutonActif
    ActiveCell.Offset(1, 0).Select
End Sub

Laborieux!

[AlainTech]

Peut-être vois-je les choses de manière trop simpliste mais il me semble que si on est dans l'événement lié à un contrôle, on connait le nom de ce contrôle.

Je me trompe?

[zazaraignée]

Tout à fait Alain. C'est d'ailleurs ce que mon petit bout de code démontre. Mais à l'usage, j'ai remarqué que le focus ne reste pas sur le bouton et retourne illico sur la cellule sélectionnée avant le clic.

Je me demande si alex ne cherche pas à garder une historique des actions de l'utilisateurs - sur les clics des boutons à tout le moins. Peut-être devrait il nous expliquer ce qu'il cherche au juste.