Discussion :

[titeZ]

Bonjour,

J'ai consulter plusieurs tutorial et aides mais chez moi ça ne fonctionne pas:
Je m'explique:

J'ai fait mes petit bout de code dans mes modules tout ça tout ça...
et je souhaite que ma macro soit lancer à l'ouverture de mon fichier..

Alors j'ai lu qu'il fallait appeler une procedure auto_open pour qu'elle s'ouvre automatiquement, j'ai lu aussi qu'il fallait la placer dans le thisworkbook de perso.xls et ensuite de call mon code initialement fait...

Mais lorsque je fait ça ...
mon code n'est pas reconnu
voila ce que je tape dans mon thisworkbooks de perso.xls

Code :

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

1
2
3
Private Sub Auto_open()
Call Message
End Sub

Mais il me dis sub ou fonction non defini pour message alors qu'il existe tout beau tout neuf dans un module du fichier en cours...

Quelqu'un peut il m'aider ???
je pense que c'est tout bete mais visiblement y'as un truc que j'ai pas pigée... merci.

[patbou]

bonjour,
mets la procedure auto_open dans un module non pas ds this workbook

[mordrhim]

ou remplace

Code :

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

Call Message

par

Code :

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

Call LeModule.Message

où LeModule est le module ou est ta fonction Message

enfin je crois

[AlainTech]

Crée une procédure dans le code de ThisWorkbook du classeur concerné:

Code :

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

1
2
3
Private Sub Workbook_Open()
  Call Message
End Sub

[ouskel'n'or]

Auto_Open ne fonctionne que si tu le places dans un module, non dans Thisworkbook (Version 2003)

Code :

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

1
2
3
Sub Auto_open()
    DernièreLigneAfficher
End Sub

Salut Alain

[AlainTech]

Hello, ousk,

Je vois que tu utilises encore souvent Auto_Open, hérité des anciens Excel (..., 5, 95), qui a été gardé par souci de compatibilité mais qui n'est plus documenté.

La "nouvelle" façon de travailler est d'utiliser l'événement Open sur ThisWorkbook.

[ouskel'n'or]

Hello Alain, En effet, comme je suis à la fois sur 97 et 2003, j'utilise toujours Auto_Open mais en réalité, je suis encore plus rétrograde que tu ne le supposes gentiment puisque j'en suis encore à

Code :

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

1
2
3
4
5
6
7
Sub Workbook_Open()
    ActiveWorkbook.RunAutoMacros Which:=xlAutoOpen
End Sub
 
Sub Auto_open()
    LaMacro
End sub

Trois lignes de plus qui assurent la compatibilité avec les versions antérieures