Appel de sub sous excel

Bonjour,

Je suis nouveau sue ce forum et j'ai un problème d'apopel de SUB sous excel 2003

Voila si quelqu'un a une réponse, mille merci

Dans un fichier excel j'ai deux feuilles de calculs la feuilles "consolidation" et el feuille "detail"

La feuille "detail" comprend un fonction (que j'ai simplifiè dans l'exemple) sub comme-ci dessous

Public Sub masquer_Click()
'Application.Cursor = xlWait
'### MsgBox ("Mise a jour des zones masquées sur la feuille")
'### Pour le materiel et logiciel
For activ_lig = 12 To 24
If Cells(activ_lig, 7) = 0 Then
Rows(activ_lig).EntireRow.Hidden = True
Sheets("Feuille_Options").Rows(activ_lig - 4).EntireRow.Hidden = True
Select Case activ_lig
'### Pour le materiel et logiciel
Case Is = 12
Range("materiel_1").Select
Selection.EntireRow.Hidden = True
End Select
Else
Rows(activ_lig).EntireRow.Hidden = False
Sheets("Feuille_Options").Rows(activ_lig - 4).EntireRow.Hidden = False
Select Case activ_lig
Case Is = 12
Range("materiel_1").Select
Selection.EntireRow.Hidden = False
End Select
End If
Next activ_lig
Application.Cursor = xlDefault
End Sub

Cette fonction marche parfaitement a partir d'un bouton de la feuille "détail"

par contre j'essaie de la lancer depuis une autre sub (voir texte ci-dessous) de la feuille "consolidation" et la aucun résultat avec le message suivant: "Erreur de compilation Sub ou fonction nin définie"

La macro appelante de la feuille "consolidation"

Public Sub genere_graph_Click()

'### Récupération de la configuration souhaité via la cellule
quoi = ActiveCell.Address(RowAbsolute:=False, ColumnAbsolute:=False)
'### Masquage des éléments dans la "detail"
Sheets("FDétail").Select
Worksheets("Détail").Activate

masquer_Click

end Sub

--------------------------------------------------------------

Voila je coince la dessus, si un généreux développeur pouvais m'aider ce serai vraiment super

Par avance merci

Bye