Discussion :

[LilyX]

Bonjour,

J'utilise régulièrement des fonctions qui manipulent des fichiers Word à partir d'Access, avec des syntaxes bien standard comme

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set wdApp = GetObject(, "Word.Application")

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set wdApp = CreateObject("Word.Application")

pour commencer.

Tout marche très bien dans un environnement tout 2007, tout 2010, tout 2013.
Là, j'ai un client qui a deux postes en Access 2013 sur un Office standard 2010.

Et là, j'ai systématiquement une erreur Automation - Bibliothèque non inscrite (alors que le même code marche nickel sur le poste qui est tout 2013).

Il y a bien Word 14.0 dans les références.
Je n'arrive pas à trouver le moyen de lui dire "va chercher Word 2010".

Quelqu'un a-t-il déjà rencontré ce problème ? (et trouvé une solution, bien sûr )

Merci d'avance pour votre aide.


LilyX

[Gado2600]

Bonjour,
Pour résoudre les problèmes de multiples versions, utilise le late binding (ou je sais plus quel nom).

Tes références à Word, tu les désactives et tes variables, tu les transforment en "Object".
Quelques adaptations sur les fonctionnalités sont à faire mais dans l'ensemble, il n'y a pas de différences point de vue code.

Par exemple, pour créer un mail, avec les références, cela donne (il me semble), ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim AppOutlook as Outlook.Application
Dim MailOutlook as Outlook.MailItem
 
Set AppOutlook = CreateObject("Outlook.Application")
Set MailOutlook = AppOutlook.CreateItem(oMailItem)

Sans références :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim AppOutlook as Object
Dim MailOutlook as Object
 
Set AppOutlook = CreateObject("Outlook.Application")
Set MailOutlook = AppOutlook.CreateItem(1) ' Correspond au numéro du paramètre oMailItem

En gros, tes paramètres deviennent les numéros qui leur correspond.
Pour les connaitre, développe avant tout avec les références, et exécute ton code en pas-à-pas afin de visualiser ces numéros.

Cordialement,

[LilyX]

Les premiers tests sont concluants !
Merci beaucoup

LilyX

[Gado2600]