fusion word 2007 avec vb 6 et un modèle de document DotxRésolu

Question

Bonjour à tous, J'ai une appli en vb6 contenant un module permettant de faire de la fusion Word à partir d'un modèle de document lorsque j'utilise un modèle ".dot" avec office 2003 ou 2007 tout est ok par contre, quand j'utilise un modèle ".dotx" avec office 2007, lors de l'ouverture du document, je récupère une erreur 13. le code utilisé est le suivant : Dim A_WORD As Object Dim mvarDocumentId As Variant On Error Resume Next ' Nouvelle instance of WORD Set A_WORD = GetObject(, "Word.Application") ' non zero means WORD wasn't open If Err.Number <> 0 Then ' ouverture WORD Set A_WORD = CreateObject("Word.Application") End If Err.Clear On Error GoTo StartWORD_Error ' Test ouverture WORD If (A_WORD Is Nothing) Then ' Erreur Message "WORDNONPRESENT", vbInformation Else ' On rend l'application non visible. A_WORD.Application.Visible = False 'c'est cette ligne ci dessous qui plante en err 13 Set mvarDocumentId = A_WORD.Application.Documents.Add(sFicModele, False) 'contrôle des champs existants lNbChamps = A_WORD.Application.activedocument.Fields.Count Malgré mes recherches, je n'ai pas trouvé d'info... donc, si quelqu'un a une idée, elle sera la bienvenue... D'avance Merci cordialement Pat Don't Worry , Be Happy

lorsque le problème est résolu, pensez Réponse Acceptée

pneau · Accepted Answer

bonjour (re)
en fait le pb vient de mon modèle dotx qui n'est pas au bon format...

je refait des tests et je reposterais un mémo si besoin

merci

Pat

 Don't Worry , Be Happy 

<hr />lorsque le problème est résolu, pensez Réponse Acceptée

Fusion word 2007 avec vb 6 et un modèle de document Dotx

1 réponse

Votre réponse

Discussions similaires