Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel appel proc d'un autre classeur

appel proc d'un autre classeur

3 réponses
Avatar
Bruno
bonjour à tous
je cherche à appeler une procédure d'un autre classeur et je bute

dans une proc de ce style, ca plante au lancement, message sub ou fonction
non définie.
sub xx()
workbooks.open "toto.xls"
call proc_du_classeur_toto
end sub


quelqu'un aurai une piste ?

merci de votre aide
Signaler un problème avec ce contenu

3 réponses

Supprimer
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
Avatar
Jacky
Bonsoir Bruno

Ceci peut-être:
'-------
Application.Run "nom_du_classeur!nom_de_la_macro"
'----------
Salutations
JJ

"Bruno" a écrit dans le message de
news:4399b03e$0$4170$
bonjour à tous
je cherche à appeler une procédure d'un autre classeur et je bute

dans une proc de ce style, ca plante au lancement, message sub ou fonction
non définie.
sub xx()
workbooks.open "toto.xls"
call proc_du_classeur_toto
end sub


quelqu'un aurai une piste ?

merci de votre aide




Avatar
Bruno
bonsoir Jacky
bon sang mais c'est bien sur !! suis-je bête !!
merci


"Jacky" a écrit dans le message de news:
%23XsLCJO$
Bonsoir Bruno

Ceci peut-être:
'-------
Application.Run "nom_du_classeur!nom_de_la_macro"
'----------
Salutations
JJ

"Bruno" a écrit dans le message de
news:4399b03e$0$4170$
bonjour à tous
je cherche à appeler une procédure d'un autre classeur et je bute

dans une proc de ce style, ca plante au lancement, message sub ou
fonction
non définie.
sub xx()
workbooks.open "toto.xls"
call proc_du_classeur_toto
end sub


quelqu'un aurai une piste ?

merci de votre aide








Avatar
JB
Bonjour,

Avec passage de 2 paramètres:

Run "malib.xls!decale", 2, 3

Classeur Malib.xs:

Sub decale(x, y)
ActiveCell.Offset(x, y).Select
End Sub

Cordialement JB