Inclure une référence

Salut Jean Marc,
Si tu est sous Excel 9 (2000) et précédent, pas de problème mais sous XP je
n'arrive plus à faire fonctionner ce code ??? Dans ce cas, je te conseille
de passer en relation tardive :

Sub AjouterReference()
On Error Resume Next
'le chemin complet de la ref. comme ci-dessous
'"C:Program FilesMicrosoft Visual StudioVB98Vb6ext.olb"
Application.VBE.ActiveVBProject.References _
.AddFromFile "Chemin de la ref."
End Sub

Hervé.

"Jean-Marc" <fiscalmendon@yahoo.fr> a écrit dans le message news:
#GcJw3niDHA.2984@TK2MSFTNGP11.phx.gbl...

Bonjour,

J'ai écrit une macro VBA sous excel qui a besoin du "microsoft scrip
running" (Il faut cocher dans le menu outil>références pour l'activer).
Existe t-il un code pour le faire automatiquement quand la macro démarre ?

--
Merci,

Jean-Marc

> "Jean-Marc" <fiscalmendon@yahoo.fr> a écrit dans le message news:

J'ai écrit une macro VBA sous excel qui a besoin du "microsoft scrip
running" (Il faut cocher dans le menu outil>références pour
l'activer). Existe t-il un code pour le faire automatiquement quand
la macro démarre ?

Hervé <hmsilve@wanadoo.fr> typed:

Sub AjouterReference()
On Error Resume Next
'le chemin complet de la ref. comme ci-dessous
'"C:Program FilesMicrosoft Visual StudioVB98Vb6ext.olb"
Application.VBE.ActiveVBProject.References _
.AddFromFile "Chemin de la ref."
End Sub

Merci, c'est ce que je recherchais ! Efficace !

--
Kenavo,

Jean-Marc