Bonjour,

voila j'ai un bouton qui active entre autre l'affichage/masquage des entetes de colonnes et lignes.
Mais voila, cette fonction ne marche que lorsque je clique sur chaque feuille.


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Callback for TB01 onAction
Sub TB01(control As IRibbonControl, pressed As Boolean)
    Application.ScreenUpdating = True
    If pressed = True Then
        ActiveWindow.DisplayWorkbookTabs = True
        Application.DisplayFormulaBar = True
        ActiveWindow.DisplayHeadings = True
    Else
        ActiveWindow.DisplayWorkbookTabs = False
        Application.DisplayFormulaBar = False
        ActiveWindow.DisplayHeadings = False
    End If
End Sub
Merci de votre sollicitude