VBA[Excel] Lancement automatique

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:

---

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.

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

ou remplace

Code:

---

Call Message

---

par

Code:

---

Call LeModule.Message

---

où LeModule est le module ou est ta fonction Message

enfin je crois

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

Code:

---

1 2 3

Private Sub Workbook_Open() Call Message End Sub

---

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

Code:

---

1 2 3

Sub Auto_open() DernièreLigneAfficher End Sub

---

Salut Alain

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.

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:

---

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 :mouarf: