Word document maken vanuit Acces

[ReilingJ]

Hallo,

ik maak gebruik van Office 2010 en heb denk ik niet alle instellingen goed staan. Mijn bedoeling is vanuit Acces een Word document te maken en heb hiervoor de volgende code in Acces:

Private Sub MaakDocument()
   Set appword = CreateObject("Word.Application")
   Set doc = appword.Documents.Add
   
   
   With appword.selection
      .TypeText "Hier komt een tektst. Datum: " & Format(Date, "Long Date")
      .TypeParagraph
      .Font.Size = 14
      .Font.Bold = wdToggle
      
   End With
      
   
End Sub

Een foutmelding krijg ik niet maar het document wordt ook niet in Word aangemaakt.

Weet iemand waarom het Word document niet wordt gemaakt?

Jan.

 

[Superzeeuw]

Zet de rode regel er eens tussen:

Private Sub MaakDocument()
   Set appword = CreateObject("Word.Application")
   Set doc = appword.Documents.Add
[COLOR="red"]   appword.Visible = True[/COLOR]
   With appword.selection
      .TypeText "Hier komt een tektst. Datum: " & Format(Date, "Long Date")
      .TypeParagraph
      .Font.Size = 14
      .Font.Bold = wdToggle
      
   End With
End Sub

 

[ReilingJ]

Yes,

helemaal super,

zeer bedankt!

 

[Superzeeuw]

Graag gedaan, maar wil je de vraag nog op opgelost zetten aub.