Macro lancement auto ne se lance pas

[ZèBelini]

Bonjour à tous,

Je cherche à faire une macro qui se lance automatiquement à l'ouverture du classeur.

Je l'appelle donc autoexec()

Mais celle ci ne se lance pas à l'ouverture du classeur. J'ai aussi essayé avec Workbook_open(), mais sans succès.

Ce qui est étrange, c'est qu'elle fonctionnait vendredi dernier... (avec Workbook_open()) Comprends pas....

Si quelqu'un a une idée/

Merci,

Voici la macro


Sub autoexec()
lastcel2 = Sheets("Users").Range("A65536").End(xlUp).Row
MsgBox (lastcel2)

Range("Users!A" & lastcel2 + 1) = Environ("username")
Range("Users!B" & lastcel2 + 1) = Now()

ThisWorkbook.Save
End Sub

 

[Risleure]

Re : Macro lancement auto ne se lance pas

Bonjour Zébélini, le Forum,

Pas autoexec, il faut utiliser l'évènement Private Sub Workbook_Open() à placer dans ThisWorkbook

Private Sub Workbook_Open()
Puis ton code à exécuter à l'ouverture
End Sub

A+

A placer dans ThisWorkbook c'est ça qui est important !!!!

 

[ZèBelini]

Re : Macro lancement auto ne se lance pas

Bonjour, et merci pour ta réponse.

Mon premier post n'était peut-être pas clair, mais j'ai bien essayé avec Private Sub Workbook_Open() à placer dans ThisWorkbook.

Le problème est le même: la macro ne se lance pas.

Merci,

Zertion

 

[ZèBelini]

Re : Macro lancement auto ne se lance pas

Bonjour Jean-Marcel,

Je ne pense pas que le pb vienne de là, le niveau de sécurité est à moyen.

Merci,

Zertion

 

[Risleure]

Re : Macro lancement auto ne se lance pas

Re,

Désolé ton code fonctionne parfaiteemnt à l'ouverture
Je récupère bien mon environnement et l'heure système !!

J'ai juste ajouté un Dim car j'ai Option Explicit voir la PJ

 

[ZèBelini]

Re : Macro lancement auto ne se lance pas

Effectivement,

Après avoir fermé Excel et relancer mon fichier, le code fonctionne....

Je ne comprends pas pourquoi il ne fonctionnait plus.

Enfin, pourvu que ça dur!

Merci dans tous les cas!