Supportnet / Forum / Datenbanken

Hallo Access-Experte, Ich bin gerade am verzweifeln. Ich stehe vor folgendem Problem: In der Access-DB, will ich eine Befehlsschaltfläche einfügen, welche mir die Daten aus dem aktuellen Datensatz an einen Wordbrief weiter gibt. Also z.B. die Adresse und die Briefanrede automatisch aus der Datenbank erstellt. Also soll diese Befehlsschaltfläche... ...die Briefvorlage öffnen, ...die Daten aus der Datenbank im Brief einfügen, ...und mir diesen Brief anzeigen! was muss ich dafür Access- und Word-technisch anstellen?! Wäre echt froh, wenn mir jemand dabei weiter helfen könnte. Grüsse vom Verzweifelten_Access_user.

dazu hab ich mir mal diesen Schnipsel gespeichert:

füge den folgenden Code ein und pass ihn an:

Dim oWrd As New Word.Application
Set oWrd = CreateObject("word.application")
oWrd.Documents.Open ("e:\Pfad\Dateiname.doc")
oWrd.Visible = True 'wenn du das Dokument sehen willst

With oWrd.ActiveDocument

.Bookmarks("Anrede").Range.Text = strAnrede

.Bookmarks("Nachname1").Range.Text = strKpName
.Bookmarks("Nachname2").Range.Text = strKpName

.Bookmarks("Vorname1").Range.Text = strKPVorname
.Bookmarks("Vorname2").Range.Text = strKPVorname

End With


Achte auf darauf, daß der Verweis auf die Wordbibliothek gesetzt ist.

Und natürlich müssen in dem Word-Dokument entsprechend benamste Textmarken existieren.

Gruß
Teddy

viel einfacher ist es, wenn Du es einen Word-Serienbrief erstellst und mit der Abfrage verknüpfst. Dann brauchst Du mit dem Button nur den Brief zu öffnen und den Seriendruck auszuführen und der Text ist automatisch eingefügt.

Also wie Teddy bereits geschrieben hat einfach nur öffnen, die with-end with-Anweisung kann dann entfallen.

gruß Marie

• pst datei importieren in exchange
• Lesezeichen lassen sich nicht in den IE importieren
• Aus excel Datei Adressetiketen importieren?
• outlook express mails importieren von dbx dateien
• exel datei importieren