Lancer Word depuis Access en VBA en creant un nouveau document ayant un nom pred

cs_davibi Messages postés 8 Date d'inscription mardi 27 avril 2004 Statut Membre Dernière intervention 12 mai 2004 - 11 mai 2004 à 11:13
cs_davibi Messages postés 8 Date d'inscription mardi 27 avril 2004 Statut Membre Dernière intervention 12 mai 2004 - 12 mai 2004 à 10:18
Bonjour a tous,

je souhaiterais a partir d'instrauctions VBA sous MS Access pouvoir lancer MS Word en creant un nouveau document ayant un nom defini dans VBA.

Par exemple, si sous VBA j'ai le nom d'un variable adresse1, je souhaite lancer Word en creant le fichier adresse1.doc

Merci par avance pour votre aide.

Cordialement,

David Billouz

2 réponses

HFanny Messages postés 699 Date d'inscription mercredi 19 février 2003 Statut Membre Dernière intervention 13 mai 2011 20
11 mai 2004 à 11:35
Bonjour,

tu peux essayer de t'inspirer de ça (je n'ai pas eu le temps de tester, je suis au boulot)

Dim appWord As Word.Application
Dim cheminFichier As String

cheminFichier = "C:\temp" & adresse1 & ".doc"

On Error Resume Next
Set appWord = GetObject(, "Word.Application")
If Err.Number <> 0 Then
Err.Clear
Set appWord = CreateObject("Word.Application")
End If
    
appWord.Documents.Add Template:="Normal", NewTemplate:=False, DocumentType:=0
ActiveDocument.SaveAs Filename:=cheminFichier

Fanny
0
cs_davibi Messages postés 8 Date d'inscription mardi 27 avril 2004 Statut Membre Dernière intervention 12 mai 2004
12 mai 2004 à 10:18
Bonjour,

J'ai essaye hier soir d'integrer ton code mais ca ne fonctionne pas. J'ai du d'abord modifier la declaration de la variable appWord en Object mais rien ne se passe quand j'execute le code.

As-tu une idee ?

Merci par avance,

David
0
Rejoignez-nous