Bonsoir à tous,
Pour récupérer un texte d'un bouton cliqué sur une feuille, j'utilise :
With Sheets("Données")
BtnTab = .Buttons(Application.Caller).Caption
BtnTab est déclarée comme un String.
Le texte dans les deux boutons est écris sur trois lignes :
1)
Tableau
de
DPC
2)
Tableau
de
RFD
Après, je devrais écrire dans [L2] selon le bouton choisi :
If BtnTab = "Tableau de DPC" Then .Range("L2").Formula = "B" _
Else: .Range("L2").Formula = "<>B"
Mais voila, même si le premier bouton est cliqué :
Tableau
de
DPC
[L2] à toujours un "<>B" !
Alors comment bien récupérer le texte d'un bouton pour faire passer le test ?
Merci d'avance.