pb automation word

Question

Bsr 
j'utilise ceci dans mon code

 Dim WordApp As Word.Application
        Dim aDoc As Word.Document
        Dim fileName As Object = "normal.dot"
        Dim newTemplate As Object = False
        Dim docType As Object = 0
        Dim isVisible As Object = True
        Dim nbi As Integer
        Dim Tag As String

        WordApp = CreateObject("word.application")
        aDoc = WordApp.Documents.Add(Application.StartupPath & "\IDCC.doc")

ect.....

La ligne en rouge me renvoie toujours l'erreur suivante:
impossible d'efectuer un cast d'objet COM de Type
Microsoft.Office.Interop.word.ApplicationClass en type de classe
Word.applicationClass....

Ce programme fonctionne sur 2 postes de test sans soucis par contre pas 
moyen de le faire fonctionner sur le poste du client final.

Merci de votre aide

jrivet · Answer

Salut,
Essaie de remplacer les deux lignes: 

Dim WordApp As Word.Application
WordApp = CreateObject("word.application")

Par cette unique ligne
Dim WordApp As New Word.Application
, ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i?n
Pensez: Réponse acceptée

Pb automation word

1 réponse

Votre réponse

Discussions similaires