Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : probleme de ouverture de fichier word [ Archives Visual Basic / Fichier / Disque ] (laulaut)

lundi 7 octobre 2002 à 11:11:30 | probleme de ouverture de fichier word

laulaut

voila je cherche a ouvrier mon fichier vord type puis lance le fussion et ferme la lettre type sans qui demande de enregistre et avour a l'ecran les lettre pres a imprime mais quand je lance il bloque a la ligne de ouverture il me dit l'object active x pres pas etre crées
voila code ouverture de la lettre type



Dim fichier As String
fichier = App.Path + "\Tournois.doc"
Word.Application.Documents.Open fichier
Word.Application.Visible = True


il bloque la

Word.Application.Documents.Open fichier

je comprend pas pourquoi


merci de votre aide

lundi 7 octobre 2002 à 13:43:03 | Re : probleme de ouverture de fichier word

Troopers

As tu créé une instance d'application avant d'ouvrir ton document :

dim myapp as word.application

set myapp=new word.application
myapp.visible=true
myapp.documents.open fichier



-------------------------------
Réponse au message :
-------------------------------

voila je cherche a ouvrier mon fichier vord type puis lance le fussion et ferme la lettre type sans qui demande de enregistre et avour a l'ecran les lettre pres a imprime mais quand je lance il bloque a la ligne de ouverture il me dit l'object active x pres pas etre crées
voila code ouverture de la lettre type



Dim fichier As String
fichier = App.Path + "\Tournois.doc"
Word.Application.Documents.Open fichier
Word.Application.Visible = True


il bloque la

Word.Application.Documents.Open fichier

je comprend pas pourquoi


merci de votre aide

lundi 7 octobre 2002 à 14:02:35 | Re : probleme de ouverture de fichier word

laulaut

merci je arrive a ouvrier le fichier
donc comme ca


Dim fichier As String

Dim myapp As Word.Application

Set myapp = New Word.Application

fichier = App.Path + "\Tournois.doc"

myapp.Visible = True

myapp.Documents.Open fichier


peut tu me dire quel fonction pour dit a word de lance la fussion
si tu peut encore m'aide merci


-------------------------------
Réponse au message :
-------------------------------

As tu créé une instance d'application avant d'ouvrir ton document :

dim myapp as word.application

set myapp=new word.application
myapp.visible=true
myapp.documents.open fichier



-------------------------------
Réponse au message :
-------------------------------

voila je cherche a ouvrier mon fichier vord type puis lance le fussion et ferme la lettre type sans qui demande de enregistre et avour a l'ecran les lettre pres a imprime mais quand je lance il bloque a la ligne de ouverture il me dit l'object active x pres pas etre crées
voila code ouverture de la lettre type



Dim fichier As String
fichier = App.Path + "\Tournois.doc"
Word.Application.Documents.Open fichier
Word.Application.Visible = True


il bloque la

Word.Application.Documents.Open fichier

je comprend pas pourquoi


merci de votre aide


lundi 7 octobre 2002 à 14:27:55 | Re : probleme de ouverture de fichier word

Troopers


dim mydoc as word.document
dim myFichierSource as string

set mydoc=myapp.documents.open(fichier)

myFichierSource ="c:\...."

mydoc.MailMerge.OpenDataSource myfichiersource

si tu veux voir un code exacte , crée une macro dans word sur le publipostage et modifie la macro dans l'éditeur VBA de Word.
tu auras la commande exacte

-------------------------------
Réponse au message :
-------------------------------

merci je arrive a ouvrier le fichier
donc comme ca


Dim fichier As String

Dim myapp As Word.Application

Set myapp = New Word.Application

fichier = App.Path + "\Tournois.doc"

myapp.Visible = True

myapp.Documents.Open fichier


peut tu me dire quel fonction pour dit a word de lance la fussion
si tu peut encore m'aide merci


-------------------------------
Réponse au message :
-------------------------------

As tu créé une instance d'application avant d'ouvrir ton document :

dim myapp as word.application

set myapp=new word.application
myapp.visible=true
myapp.documents.open fichier



-------------------------------
Réponse au message :
-------------------------------

voila je cherche a ouvrier mon fichier vord type puis lance le fussion et ferme la lettre type sans qui demande de enregistre et avour a l'ecran les lettre pres a imprime mais quand je lance il bloque a la ligne de ouverture il me dit l'object active x pres pas etre crées
voila code ouverture de la lettre type



Dim fichier As String
fichier = App.Path + "\Tournois.doc"
Word.Application.Documents.Open fichier
Word.Application.Visible = True


il bloque la

Word.Application.Documents.Open fichier

je comprend pas pourquoi


merci de votre aide



lundi 7 octobre 2002 à 14:49:44 | Re : probleme de ouverture de fichier word

laulaut

oui donc ca fais


Dim fichier As String
Dim myapp As Word.Application
Dim mydoc As Word.Document
Dim myFichierSource As String
Set myapp = New Word.Application
fichier = App.Path + "\Tournois.doc"
Set mydoc = myapp.Documents.Open(fichier)
myFichierSource = App.Path + "\Bd.mdb"
mydoc.MailMerge.OpenDataSource myFichierSource


donc quand je lance il ouvert le fichier doc il me demande quel base utilise je voudrais qui c'est que c'est la base membre les chanps reste vide pourquoi il faut les redefimir dans vb mais comment dit quel tables et quel champs

merci

-------------------------------
Réponse au message :
-------------------------------


dim mydoc as word.document
dim myFichierSource as string

set mydoc=myapp.documents.open(fichier)

myFichierSource ="c:\...."

mydoc.MailMerge.OpenDataSource myfichiersource

si tu veux voir un code exacte , crée une macro dans word sur le publipostage et modifie la macro dans l'éditeur VBA de Word.
tu auras la commande exacte

-------------------------------
Réponse au message :
-------------------------------

merci je arrive a ouvrier le fichier
donc comme ca


Dim fichier As String

Dim myapp As Word.Application

Set myapp = New Word.Application

fichier = App.Path + "\Tournois.doc"

myapp.Visible = True

myapp.Documents.Open fichier


peut tu me dire quel fonction pour dit a word de lance la fussion
si tu peut encore m'aide merci


-------------------------------
Réponse au message :
-------------------------------

As tu créé une instance d'application avant d'ouvrir ton document :

dim myapp as word.application

set myapp=new word.application
myapp.visible=true
myapp.documents.open fichier



-------------------------------
Réponse au message :
-------------------------------

voila je cherche a ouvrier mon fichier vord type puis lance le fussion et ferme la lettre type sans qui demande de enregistre et avour a l'ecran les lettre pres a imprime mais quand je lance il bloque a la ligne de ouverture il me dit l'object active x pres pas etre crées
voila code ouverture de la lettre type



Dim fichier As String
fichier = App.Path + "\Tournois.doc"
Word.Application.Documents.Open fichier
Word.Application.Visible = True


il bloque la

Word.Application.Documents.Open fichier

je comprend pas pourquoi


merci de votre aide




lundi 7 octobre 2002 à 15:11:30 | Re : probleme de ouverture de fichier word

Troopers


si ton modele, c'est à dire "fichier" dans le code,
est bien défini tout doit etre automatique
mais il faut que les champs que tu vas chercher dans ton modèle soit bien ceux de ta base de données

sinon tu peux ajouter les champs par le code avec
mydoc.fields.add laPosition,wdFieldMergeField,leNomChamp

et fusionner avec
mydoc.MailMerge.ViewMailMergeFieldCodes = wdToggle

lundi 7 octobre 2002 à 16:01:01 | Re : probleme de ouverture de fichier word

laulaut

oui maintemant il fussion mais la femettre world c'est une page sans bouton selement une croix pour ferme je voudrais vord complet
et il a demande quand meme la table a utilise dans la bd je voudrais qui c'est que c'est membre a chaque fois
et la il a fussion le premier qui a touvais et arrette je vuet qui fais les lettres a la suite et qui faut tous la table
voila mon code

Dim fichier As String
Dim myapp As Word.Application
Dim mydoc As Word.Document
Dim myFichierSource As String
Set myapp = New Word.Application
fichier = App.Path + "\Tournois.doc"
Set mydoc = myapp.Documents.Open(fichier)
myFichierSource = App.Path + "\MICROLAN.mdb"
mydoc.MailMerge.OpenDataSource myFichierSource
mydoc.MailMerge.ViewMailMergeFieldCodes = wdToggle


merci

-------------------------------
Réponse au message :
-------------------------------


si ton modele, c'est à dire "fichier" dans le code,
est bien défini tout doit etre automatique
mais il faut que les champs que tu vas chercher dans ton modèle soit bien ceux de ta base de données

sinon tu peux ajouter les champs par le code avec
mydoc.fields.add laPosition,wdFieldMergeField,leNomChamp

et fusionner avec
mydoc.MailMerge.ViewMailMergeFieldCodes = wdToggle

lundi 7 octobre 2002 à 16:59:00 | Re : probleme de ouverture de fichier word

Troopers

vérifie la position de myapp.visible=true
je ne sais plus si il fo le mettre avant ou apres l'ouverture du document
Pour avoir les lettres à la suite, je ne sais pas comment faire
mais pour passer à la lettre suivante il fo clicker sur << 1 >>



-------------------------------
Réponse au message :
-------------------------------

oui maintemant il fussion mais la femettre world c'est une page sans bouton selement une croix pour ferme je voudrais vord complet
et il a demande quand meme la table a utilise dans la bd je voudrais qui c'est que c'est membre a chaque fois
et la il a fussion le premier qui a touvais et arrette je vuet qui fais les lettres a la suite et qui faut tous la table
voila mon code

Dim fichier As String
Dim myapp As Word.Application
Dim mydoc As Word.Document
Dim myFichierSource As String
Set myapp = New Word.Application
fichier = App.Path + "\Tournois.doc"
Set mydoc = myapp.Documents.Open(fichier)
myFichierSource = App.Path + "\MICROLAN.mdb"
mydoc.MailMerge.OpenDataSource myFichierSource
mydoc.MailMerge.ViewMailMergeFieldCodes = wdToggle


merci

-------------------------------
Réponse au message :
-------------------------------


si ton modele, c'est à dire "fichier" dans le code,
est bien défini tout doit etre automatique
mais il faut que les champs que tu vas chercher dans ton modèle soit bien ceux de ta base de données

sinon tu peux ajouter les champs par le code avec
mydoc.fields.add laPosition,wdFieldMergeField,leNomChamp

et fusionner avec
mydoc.MailMerge.ViewMailMergeFieldCodes = wdToggle


lundi 7 octobre 2002 à 17:21:58 | Re : probleme de ouverture de fichier word

laulaut

ok comme ca ca marche


Dim fichier As String
Dim myapp As Word.Application
Dim mydoc As Word.Document
Set myapp = New Word.Application
fichier = App.Path + "\Tournois.doc"
myapp.Visible = True
Set mydoc = myapp.Documents.Open(fichier, False, False)
mydoc.MailMerge.ViewMailMergeFieldCodes = wdToggle


mais il fais pas le page a la suite je sais que dans word je faire verification il ouvert une autre feuille il les fais a la suite
il essayete pas un code pour lance la verification de fussion de word dans vb

merci

-------------------------------
Réponse au message :
-------------------------------

vérifie la position de myapp.visible=true
je ne sais plus si il fo le mettre avant ou apres l'ouverture du document
Pour avoir les lettres à la suite, je ne sais pas comment faire
mais pour passer à la lettre suivante il fo clicker sur << 1 >>



-------------------------------
Réponse au message :
-------------------------------

oui maintemant il fussion mais la femettre world c'est une page sans bouton selement une croix pour ferme je voudrais vord complet
et il a demande quand meme la table a utilise dans la bd je voudrais qui c'est que c'est membre a chaque fois
et la il a fussion le premier qui a touvais et arrette je vuet qui fais les lettres a la suite et qui faut tous la table
voila mon code

Dim fichier As String
Dim myapp As Word.Application
Dim mydoc As Word.Document
Dim myFichierSource As String
Set myapp = New Word.Application
fichier = App.Path + "\Tournois.doc"
Set mydoc = myapp.Documents.Open(fichier)
myFichierSource = App.Path + "\MICROLAN.mdb"
mydoc.MailMerge.OpenDataSource myFichierSource
mydoc.MailMerge.ViewMailMergeFieldCodes = wdToggle


merci

-------------------------------
Réponse au message :
-------------------------------


si ton modele, c'est à dire "fichier" dans le code,
est bien défini tout doit etre automatique
mais il faut que les champs que tu vas chercher dans ton modèle soit bien ceux de ta base de données

sinon tu peux ajouter les champs par le code avec
mydoc.fields.add laPosition,wdFieldMergeField,leNomChamp

et fusionner avec
mydoc.MailMerge.ViewMailMergeFieldCodes = wdToggle



lundi 13 octobre 2003 à 16:24:18 | Re : probleme de ouverture de fichier word

Raptor39


salut,

jreviens à ton premier post "ferme la lettre type sans qui demande de enregistre" parce que moi je n'arrive pas à faire ça, ça demande tjs d'enregistrer, surement que mon prog fait quelque chose qui fait que word doit enregistrer, mais je sais pas quoi, si vous voyez d'où peut venir le problème...

en fait, jaimerais par un click dans vb, que ça ouvre le résultat de la fusion et non pas le document principal
j'ai cherché tous les codes sur vbfrance et rien n'est adapté à mon souci

merci d'avance


1 2

Cette discussion est classé dans : fichier, ouverture, codevb, type, word


Répondre à ce message

Sujets en rapport avec ce message

associatio et ouverture de type de fichier [ par kelm_by ] salut tous le monde,il ya quelque jour j'ai trouver un proget vb ici qui permet l'association et l'ouverture de type de fichier mais je ne le trouve p ouverture d'un fichier word [ par ben ] je dispose de vb3comment lancer l'ouverture d'un fichier word lorsque je clique sur un bouton visual? (qu'elle est le code?)merci ouverture ecriture sauvegarde fermeture WORD et ASP [ par glopglop ] Salut Tous!!Je voudrais que ma page asp ouvre un fichier type word (deja existant : c'est une sorte de questionnaire). Que l'utilisateur modifie le fi ouverture lecture ecriture sauvegarde WORD [ par glopglop ] Salut Tous!!Je voudrais que ma page asp ouvre un fichier type word. Que l'utilisateur modifie le fichier et que le fichier soit enregistré avec un aut ouverture d'un userform à l'ouverture d'un fichier word [ par xadep ] bonjour,Je souhaiterais ouvrir un userform lors de l'ouverture de mon document word??merci de me donner la sol ouverture de fichier word [ par kurky ] Bonjours,J'ai un problème au niveau d'une ouverture de fichier word.Lorsque je cré un fichier .doc en temps normal ca se passe bien. Mais dans un cert Test ouverture fichier word [ par neophenix83 ] Bonjour, dans une macro excel, je viens copier des données d'un fichier word. Pour cela, j'ouvre mon fichier word. Seulement, ma macro plante si le fi Données sous Word2000 [ par Janeo ] Bonjour, Après avoir parcouru les questions du forum, pas de réponse à ce qui suit : J'ai un fichier Word 2000 du type suivant : micro;computer;;komp ouverture fermeture word depuis excel [ par jraynald ] à partir d'excel j'ouvre un document word pour le remplir à partir des données dans excel, la ou je bloque c'est à la fermeture de word je voudrais co


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version


HTC Magic

Entre 429€ et 429€


Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,328 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.