Bonjour le forum,

J’ai quelques soucis avec la manipulation de boutons en vba excel 2010.
Les boutons sont construits selon le code suivant :
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
    'button unhide Data
    Set CtrlBtn = ws.Shapes.AddFormControl(xlButtonControl, 100, 400, 10, 10)
    Set q_btn = CtrlBtn.Parent
CtrlBtn.OnAction = "btn_unhide_Data_Click"
With q_btn
    With .Characters.Font
        .Name = "Century Schoolbook"
        .Size = 12
        .FontStyle = "Italic"
    End With
    .Name = "btn_unhide_Data"
    .Text = "unhide data"
    .AutoSize = True
    .Visible = True
End With
Dans la procédure sub btn_unhide_data_click, je voudrais
  • Modifier le caption du bouton en « Hide Data » et
  • Modifier la couleur de fond en rouge
.
J’ai fait plusieurs essais (infructueux) en me basant sur la documentation VBA Excel 2010 de Microsoft : pas d’intellisense ou si présent, pas de caption ni backcolor présents.
Un membre du forum pourrait-il me conseiller quelques pistes, de préférence avec exemples, pour résoudre ce problème.
D’avance merci.

Harry