Lancement d'une macro à l'ouverture d'un fichier Project
2 réponses
kaleidoscope
Bonjour,
Je souhaite qu'une macro s'ouvre à l'ouverture d'un fichier Project pour qu'un filtre apparaisse. J'ai donc regroupé différents éléments trouvés sur le forum :
Private Sub Project_Open(ByVal pj As Project)
FilterApply Name:="Selection"
End Sub
Cependant j'obtiens le message d'erreur suivant :
Compile error:
Expected variable or procedure, not module
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
kaleidoscope
kaleidoscope a écrit le 22/11/2010 à 15h29 :
Bonjour,
Je souhaite qu'une macro s'ouvre à l'ouverture d'un fichier Project pour qu'un filtre apparaisse. J'ai donc regroupé différents éléments trouvés sur le forum :
Private Sub Project_Open(ByVal pj As Project)
FilterApply Name:="Selection"
End Sub
Cependant j'obtiens le message d'erreur suivant : Compile error: Expected variable or procedure, not module
Je souhaite qu'une macro s'ouvre à l'ouverture d'un fichier Project pour
qu'un filtre apparaisse. J'ai donc regroupé différents
éléments trouvés sur le forum :
Private Sub Project_Open(ByVal pj As Project)
FilterApply Name:="Selection"
End Sub
Cependant j'obtiens le message d'erreur suivant :
Compile error:
Expected variable or procedure, not module
Je souhaite qu'une macro s'ouvre à l'ouverture d'un fichier Project pour qu'un filtre apparaisse. J'ai donc regroupé différents éléments trouvés sur le forum :
Private Sub Project_Open(ByVal pj As Project)
FilterApply Name:="Selection"
End Sub
Cependant j'obtiens le message d'erreur suivant : Compile error: Expected variable or procedure, not module
Votre raisonnement est juste voici un code qui fonctionne:
--------------------------------------------------------------------------- --------------------------------- Private Sub Project_Open(ByVal pj As Project)
> Je souhaite qu'une macro s'ouvre l'ouverture d'un fichier Project pour > qu'un filtre apparaisse. J'ai donc regroup diff rents > l ments trouv s sur le forum :
> Private Sub Project_Open(ByVal pj As Project)
> FilterApply Name:="Selection"
> End Sub
> Cependant j'obtiens le message d'erreur suivant : > Compile error: > Expected variable or procedure, not module
Sandra- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Bonjour,
Votre raisonnement est juste voici un code qui fonctionne:
--------------------------------------------------------------------------- ---------------------------------
Private Sub Project_Open(ByVal pj As Project)
On 6 déc, 09:29, kaleidoscope <kaleidosc...@domain-xyz.in> wrote:
kaleidoscope a crit le 22/11/2010 15h29 :
> Bonjour,
> Je souhaite qu'une macro s'ouvre l'ouverture d'un fichier Project pour
> qu'un filtre apparaisse. J'ai donc regroup diff rents
> l ments trouv s sur le forum :
> Private Sub Project_Open(ByVal pj As Project)
> FilterApply Name:="Selection"
> End Sub
> Cependant j'obtiens le message d'erreur suivant :
> Compile error:
> Expected variable or procedure, not module
Votre raisonnement est juste voici un code qui fonctionne:
--------------------------------------------------------------------------- --------------------------------- Private Sub Project_Open(ByVal pj As Project)
> Je souhaite qu'une macro s'ouvre l'ouverture d'un fichier Project pour > qu'un filtre apparaisse. J'ai donc regroup diff rents > l ments trouv s sur le forum :
> Private Sub Project_Open(ByVal pj As Project)
> FilterApply Name:="Selection"
> End Sub
> Cependant j'obtiens le message d'erreur suivant : > Compile error: > Expected variable or procedure, not module