evolution
Goto Top

Access 2013 - Daten an Word-Dokument übergeben und drucken

Hallo, ich habe eine Frage zu Access 2013. Ist es möglich aus Access heraus einen Druckauftrag eines Word-Dokuments anzustoßen und aus der DB einige Daten an das Dokument zu übergeben?
Hintergrund ist folgender. Zur Zeit erzeuge ich immer Berichte mit Kundendaten, die dann gedruckt werden. Diese Berichte ändern sich aber häufig und ich möchte nicht, dass jemand an der Access DB arbeitet.

ich dachte mir, es ist doch bestimmt einfacher, wenn man diverse Word-Serienbrief in einem Vorlagen-Verzeichnis hat und dann in Access nur noch den Kunden und das Dokument wählt. Dann kann die Sekretärin je nach Bedürfnis die Word-Dateien abändern. Das kann Sie ja..

Hat das schon mal wer gemacht und hat eine Beispiel für mich?

Danke!

Content-Key: 266555

Url: https://administrator.de/contentid/266555

Printed on: April 24, 2024 at 11:04 o'clock

Member: eisbein
eisbein Mar 17, 2015 updated at 11:45:18 (UTC)
Goto Top
Mahlzeit!

Ist es möglich aus Access heraus einen Druckauftrag eines Word-Dokuments anzustoßen

Mittels VBA kannst du das Word-Dokument öffnen und auch drucken. Ist aber etwas umfangreich, da jedes Word-Dokument anders ist.

ich möchte nicht, dass jemand an der Access DB arbeitet

Wenn du diese nicht explizit geschützt hast wird das aber nichts werden, selbst ein Datenbank-Kennwort kann man mit einfachen Mitteln knacken face-smile

ich dachte mir, es ist doch bestimmt einfacher, wenn man diverse Word-Serienbrief in einem Vorlagen-Verzeichnis hat und dann in Access nur noch den Kunden und das Dokument wählt. Dann kann die Sekretärin je nach Bedürfnis die Word-Dateien abändern

Warum machst du es nicht anders rum und Word soll die Daten aus Access holen?

Geht es also nur darum eine bestimmte Datei zu drucken, ohne vorher Veränderungen vorzunehmen oder soll ein Word-Vorlage geöffnet, befüllt und gedruckt werden?

Gruß
Eisbein
Member: evolution
evolution Mar 17, 2015 updated at 11:46:56 (UTC)
Goto Top
Nun ja.. Es geht nicht ums Knacken der DB. Die wird eh nur von Sekretärinnen bedient, die sich nicht damit auskennen.
Es geht darum eine komfortable Oberfläche zu bieten. Es gibt ca. 120 verschiedene Berichte, die aber immer mal im Wortlaut geändert werden müssen. Da kommen Änderungen unserer Rechtsabteilung bis zu 4 mal am Tag. Da kannst du ja gleiche jemand dafür einstellen.

Wenn ich es als Serienbrief aus Word heraus hole, muss immer erst noch gefiltert werden. Das ist zu viel Aufwand..

In Access soll einfach ein Formular erzeugt werden, in dem der Kunde gewählt wird, dann der passende Brief und dann Feuer!
Member: eisbein
eisbein Mar 17, 2015 at 11:47:33 (UTC)
Goto Top
Hallo!

Geht es also nur darum eine bestimmte Datei zu drucken, ohne vorher Veränderungen vorzunehmen oder soll ein Word-Vorlage geöffnet, befüllt und gedruckt werden?

Kannst du das ganze etwas genauer schildern?

Gruß
Eisbein
Member: evolution
evolution Mar 17, 2015 at 11:52:19 (UTC)
Goto Top
Nochmal.. zu deinem Nachtrag:

Es soll ein Verzeichnis mit Word-Serienbriefen geben. Da liegen dann die verschiedenen Versionen drin. In der Datei sind Platzhalter für die Kundendaten.
An den Variablen/Feldnamen wird nicht geändert.. Die werde ich dann alle aufbereiten.
Die Sekretärinnen müssen die Word-Dateien bearbeiten können. Textliche Veränderungen auf Grund der Rechtsabteilung..

Aus Access wird dann über ein Formular der Kunde ausgewählt. Darunter dann eine Liste mit den vorhandenen Dokumenten, um eins auszuwählen.
Dann einfach nur noch Drucken. Veränderungen werden von dieser Stelle aus nicht gemacht..
Member: eisbein
eisbein Mar 17, 2015 at 11:59:42 (UTC)
Goto Top
Ich muss noch einmal nachfragen, um sicher zu gehen, dass wir konform sind.

Die Word-Serienbriefe sind bereits fix mit der Datenquelle verknüpft und befüllt? Es geht nur darum via Access eine Datei xy zu wählen und zu drucken?

Gruß
Eisbein
Member: eisbein
eisbein Mar 17, 2015 updated at 12:49:41 (UTC)
Goto Top
Dim wrdApp As Object, wrdDoc As Object
Dim filepath As String

Set wrdApp = CreateObject("word.application")  

wrdApp.Visible = True  

filepath = "C:\worddatei.docx"  
Set wrdDoc = wrdApp.Documents.Add(filepath)

Damit kann man per VBA Code eine Word-Datei öffnen. Erstelle ein Macro und füge den Code ein.
filepath muss noch angepasst werden.

Wie sehen die Ergebnisse aus?

Weiterführend kann man, falls nötig, die Serienbrief-Datenquelle kundenspezifisch ändern, sodass beim direkten Aufruf der Word-Datei kein "Filter" nötig ist.
Member: evolution
evolution Mar 17, 2015 updated at 12:50:43 (UTC)
Goto Top
Ich wähle den Kunden und die Datei. Dann müssen die Kundendaten an die Datei übermittelt werden und gedruckt werden. Es ist keine fixe Zuordnung des Kunden in der Datei. Das ist der variable Teil.
Am liebsten wäre es mit, wenn man das Verzeichnis auslesen könnte und dann wählen..
Member: eisbein
eisbein Mar 17, 2015 at 12:53:52 (UTC)
Goto Top
Kommst du damit etwas in Zielnähe?