[Résolu] Macro qui ne veut pas s'exécuter !!

[libellule85]

Bonjour le forum,

J'ai besoin de vos lumières. En effet j'ai la macro suivante qui ne veut pas démarrer, toutes les autres fonctionnent impeccablement, mais à chaque fois que je clique sur la macro en question celà me met un message comme quoi mes macros sont désactivées ou absentes (alors qu'elles sont bien là !!) :

Sub ImprimeAuto60(ByVal control As IRibbonControl)
Dim I As Long
 Application.ScreenUpdating = False
 For I = 1 To 251
     If Application.CountA(Rows(I)) = 0 Then Rows(I).Hidden = True
 Next I
 Application.ScreenUpdating = True
 ActiveSheet.PrintOut
 Application.ScreenUpdating = False
 For I = 1 To 251
     If Application.CountA(Rows(I)) = 0 Then Rows(I).Hidden = False
 Next I
 Application.ScreenUpdating = True
End Sub

C'est une macro que je lance à partir du ruban avec comme commande onAction="ImprimeAuto60".

D'avance merci pour votre aide

 

[tototiti2008]

Re : Macro qui ne veut pas s'exécuter !!

Bonjour Libellule,

pas trop touché aux "barres d'outils" en 2007 pour l'instant, mais à quoi sert le

ByVal control As IRibbonControl

?
Peux-tu t'en passer ?

 

[libellule85]

Re : Macro qui ne veut pas s'exécuter !!

Bonjour tototiti,

ByVal control As IRibbonControl sert à exécuter les macros à partir du ruban

 

[libellule85]

[Résolu] Macro qui ne veut pas s'exécuter !!

re,

J'ai trouvé une solution !! Il faut que je change le nom de la macro ! Et celà refonctionne normalement.