OVH Cloud OVH Cloud

Comment appeler une procédure d'un autre classeur?

3 réponses
Avatar
Aurélien29
J'essaie d'appeler une procédure appartenant à un autre classeur, J'ai
essayer pas mal de trucs mais ça marche pas.
Trucs essayés:
Call {"D:\programmes Excel\Nbas\Nbas.xls"}.Gestion_suppression_click
Call ["D:\programmes Excel\Nbas\Nbas.xls"}].Gestion_suppression_click
Call [Nbas.xls].Feuil1.gestion_suppression_click
Call [Nbas.xls].Sheets(1).gestion_suppression_click
(Le classeur Nbas.xls est ouvert en même temps que le classeur appelant)
à chaque fois, Erreur '424' Objet requis

Si vous trouvez une solution ce serai cool

3 réponses

Avatar
Oliv'
Hellooo,
Essaye
repertoirefichier.xls!macro

Oliv'

"Aurélien29" <Auré a écrit dans le message
de news:
J'essaie d'appeler une procédure appartenant à un autre classeur, J'ai
essayer pas mal de trucs mais ça marche pas.
Trucs essayés:
Call {"D:programmes ExcelNbasNbas.xls"}.Gestion_suppression_click
Call ["D:programmes ExcelNbasNbas.xls"}].Gestion_suppression_click
Call [Nbas.xls].Feuil1.gestion_suppression_click
Call [Nbas.xls].Sheets(1).gestion_suppression_click
(Le classeur Nbas.xls est ouvert en même temps que le classeur appelant)
à chaque fois, Erreur '424' Objet requis

Si vous trouvez une solution ce serai cool
Avatar
papou
Bonjour
Lorsqu'il s'agit d'une macro :
Application.Run("NBas.xls!Macro1")
Maintenant s'agissant d'un évènement je ne pense pas que cela soit possible.
Cordialement
Pascal

"Aurélien29" <Auré a écrit dans le message
de news:
J'essaie d'appeler une procédure appartenant à un autre classeur, J'ai
essayer pas mal de trucs mais ça marche pas.
Trucs essayés:
Call {"D:programmes ExcelNbasNbas.xls"}.Gestion_suppression_click
Call ["D:programmes ExcelNbasNbas.xls"}].Gestion_suppression_click
Call [Nbas.xls].Feuil1.gestion_suppression_click
Call [Nbas.xls].Sheets(1).gestion_suppression_click
(Le classeur Nbas.xls est ouvert en même temps que le classeur appelant)
à chaque fois, Erreur '424' Objet requis

Si vous trouvez une solution ce serai cool



Avatar
Aurélien29
Merci d'avoir essayé et de m'avoir aidé:

La solution est:
Application.Run (Workbooks("nbas.xls").Sheets(1).gestion_suppression_click)
à condition que Nbas.xls soit ouvert

Merci beaucoup