✔ Von Access 2000 in Word 2000 schreiben?!

[TaylorDorton]

Hallo,

habe hier gerade ne kleine Übungsaufgabe vor mir,
die Teil eines grösseren ganzen ist. Mein Ziel ist es
von Access mittels VBA in Word ein neues Doc. zu öffnen
und in dieses Doc.zu schreiben. Verweis habe ich natürlich beachtet!
Nun klappt das Starten von Word Super, aber das Doc selber ist nicht
zu sehen. Hier mal der Code, denke ich mache einen Denkfehler.

Option Compare Database

Public Sub test()
 Dim wd As Object
 Dim doc As Object
 
 Set wd = CreateObject("Word.Application")
 wd.Visible = True
 
 Documents.Add
 Selection.TypeText "Test"
 
End Sub

Würde mich freuen wenn Ihr Helfen könnt
und vielen Dank!

greetz Taylor

 

[Merlin_78]

Hallo

versuch mal eine andere Deklaration für "wd":

Dim wd As New Word.Application

 

[TaylorDorton]

Funktioniert! vielen Lieben Dank.
Vieleicht kannst du mir erklären warum es auf diese weisse Funktioniert?
Bin bisher eigentlich davon Ausgegangen das:

Dim wd as New Word.Application

und

dim wd as Object
set wd = CreateObject("Word.Application")

das gleiche Bewirken

greetz Taylor

 

[Merlin_78]

Hallo Taylor,

es ist schon so, daß es mit deinem Code auch funktioniert. Du mußt dann eben mit "wd.Documents.Add" ein neues Dokument erstellen.

Wie du aber bemerken wirst, werden dir die verschiedenen Funktionen und Methoden nicht angezeigt, wenn du z.B. "wd." angibst. VB weis zu diesem Zeitpunkt noch nicht, was für ein Objekt du erstellen willst. Die Anweisung "CreateObject" wird wohl erst bei der Programmausführung berücksichtigt.

Wenn du aber schon bei der Deklaration einen Verweis zu Word setzt, teilst du VB mit, daß ein neues Word-Objekt erzeugt werden soll. Somit sind auch schon alle vorhanden Funktionen und Methoden bekannt.

 

[TaylorDorton]

Merci!

Habs Verstanden und wieder was dazu gelernt vielen dank!

greetz Taylor