Problème d'ouverture de model WORD à partir de VB

NykoKurapika Messages postés 37 Date d'inscription jeudi 10 février 2005 Statut Membre Dernière intervention 10 janvier 2008 - 18 oct. 2005 à 10:17
yuri1961 Messages postés 71 Date d'inscription jeudi 16 juin 2005 Statut Membre Dernière intervention 16 février 2007 - 18 oct. 2005 à 11:22
Bonjour à tous, j'ai un petit soucis en programmation VB6.



J'ai réalisé une application VB6 qui devrait permêtre de sélectionner
une liste de stagiaires et d'enregistrer leur informations respectives
dans une table ACCESS pour la réalisation de publipostage sous WORD.



Les étapes sont les suivantes :

-On sélectionne les personnes

-On enregistre leurs infos dans une table (TOTO par exemple)

-On ouvre un model WORD qui contiend déjà du publipostage ver la table (TOTO)

-Dans ce model on est censé avoir tout de suite access au nouvelles
données de la table puisque la liaison ver la table à été
enregistrée aussi !!





ET BIEN NON !!!!!!!!!



En fait plus ou moin ! Sous windows ca marche, on peut ouvrir le model et la liaison ver la table est toujours présente



Seulement sous VB ! pas moyen ! où alors je ne connait pas la bonne commande !



le lien ver la table est supprimé a chaque coup !



j'utilise le code suivant :



dim appword as word.application



Set appword=CreateObject("word.application")



appword.visible=true



appword.documents.open ("chemin du model word")



si quelqu'un pouvait me dépanner en m'explicant ce qui ne va pas ou ce qui manque

ce serrait génial !!



Par avance merci



Nyko

1 réponse

yuri1961 Messages postés 71 Date d'inscription jeudi 16 juin 2005 Statut Membre Dernière intervention 16 février 2007
18 oct. 2005 à 11:22
salut!

Tache de faire comme ca, chez moi cela va bien.



Dim objDoc As Word.Document

dim objWord as word.application

Set objWord = New Word.Application

Set objDoc = objWord.Documents.Open(App.Path & _

"document.doc")

objDoc.Activate

objWord.Visible = True
0
Rejoignez-nous