Discussion :

[issoram]

Bonjour à tous,

J'ai défini une banale méthode de mise en forme d'une feuille, dans le code de l'objet associé à cette feuille.
Par exemple dans le module de Feuil1, j'ai

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Public Sub MEF
End Sub

Or j'aimerais appeler cette méthode à l'ouverture du classeur, ce qui ne fonctionne pas m'indiquant que la méthode n'existe pas. Je pense que cela vient du fait que la méthode n'est pas encore "chargée" au moment de l'appel (à l'ouverture du classeur), car une fois le classeur ouvert je peux l'appeler sans problème.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Workbook_Open()
    Worksheets("Feuil1").MEF    'Erreur ici
end Sub

Bon, je peux toujours définir cette méthode dans un module classique, mais je trouve dommage de ne pas la laisser la méthode dans le module de la Feuille concernée, étant donnée que c'est une méthode qui lui est propre.

Ma question (enfin )est donc: peut t'on contourner ce problème en laisser la méthode dans le module lié à l'objet Feuille?

Merci d'avance

[tedo01]

Bonjour,
Essaie avec la syntaxe suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Feuil1.MF

[jfontaine]

Bonjour,

Essais en décalant l'exécution dans le temps (5 seconde après ouverture)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Workbook_Open()
    Application.OnTime Now + TimeValue("00:00:5"), "Feuil1.MEF"
end Sub

[issoram]

Merci à vous 2:

Tedo: Avec ta méthode la compilation passe ce qui n'était pas le cas avant, mais à l'ouverture j'ai l'erreur

Objet recquis

L'objet Feuil1 ne doit pas encore être instancié quand j'appelle ma méthode, mais ça me semble bizarre.

Jfontaine: Je n'ai pas essayé mais je ne suis pas très adepte de ce genre de manip (que je ne maitrise pas bien d'ailleurs). Je préfère autant définir ma méthode dans un autre module.

[tedo01]

Re-bonjour,
Il doit y avoir un autre problème, je viens de faire le test et chez moi ça fonctionne.
Lorsque tu as l'erreur, si tu vas en debug, est-ce que tu peux continuer l'exécution en pas à pas ?

[fring]

Bonjour,
Essaie avec la syntaxe suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Feuil1.MF

Feuil1.MEF

[tedo01]

Bonjour,
Merci fring pour ta correction mais si le problème venait de ma faute de frappe, ça ne passerait pas la compilation...

[issoram]

Merci beaucoup Tedo effectivement il s'agissait d'une autre erreur.
Ça fonctionne très bien comme ceci.

Par contre est que tu sais pourquoi l'autre syntaxe plante?

[tedo01]

Bonjour,
Ta première syntaxe fonctionne avec le libellé de l'onglet, alors que celle que je te propose est basée sur son nom.
Par exemple, je peux avoir un onglet qui se nomme Feuil1 (on voit le nom dans l'éditeur VB, sous "Microsoft Excel Objects", avec à côté le libellé entre parenthèses), mais dont l'intitulé est "Recap".
Je peux alors l'appeler Worksheets("Recap") ou Feuil1, mais Worksheets("Feuil1") ne marchera pas.
Est-ce que Feuil1 est aussi bien le nom que le libellé de l'onglet dans ton classeur ?