Je ne suis pas vraiment un débutant (plutôt un autodidacte qui commence à se débrouiller sous VBA) mais ma question est digne d'un débutant. Mais bon il n'y a pas de question idiote, hein ?


Voilà j'ai un bouton de type toggle sur ma feuille et je voudrais récupérer sa valeur dans une fonction pour le faire changer de couleur. Mais j'ignore comment je dois le déclarer dans ma fonction :
en admettant que ce bouton se nomme "BOB" (ceci est un exemple minimaliste mais je crée des boutons par macro ainsi que leur code associé d'où lutilité de la fonction)

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Sub BOB_Click() 'changement de couleur du bouton s'il est ou pas enfoncé
    Dim Nom_btn as ????
    Nom_btn = "BOB"
    FN_Btnclic Nom_btn
End Sub
 
Public Function FN_Btnclic(ByVal Nam As ?????)
    If Nam.Value = True Then
        Nam.BackColor = RGB(255, 0, 0)
    Else
        Nam.BackColor = RGB(0, 255, 0)
    End If
End Function
Du coup je ne sais pas comment je dois déclarer mes variable Nom_btn et Nam (string, OLEObject ????)
Merci d'avance pour votre aide