Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
per Button erstelltes Word Dokument sofort drucken
zurück: Prozent in Kombifeld weiter: gefiltertes Formular nochmals filtern Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Lissy85
Gast


Verfasst am:
07. Okt 2013, 11:27
Rufname:

per Button erstelltes Word Dokument sofort drucken - per Button erstelltes Word Dokument sofort drucken

Nach oben
       Version: Office 2010

Guten Morgen,

ich habe in Access folgendes programmiert, damit Daten aus Access in ein Word Dokument gelesen werden und dieses dann geöffnet wird:

Code:
Private Sub btnRücklauf_Click()
Set objWord = CreateObject("Word.Application")
    With objWord
        .Visible = True
        .Documents.Open "H:\Rückgabe.doc"
        .ActiveDocument.Bookmarks("Straße").Select
        .Selection.Text = Me!Straße
        .ActiveDocument.Bookmarks("PLZ").Select
        .Selection.Text = Me!PLZ       
    End With
    Set objWord = Nothing
End Sub


Ich möchte diesen Code aber so umbastelt, dass beim Klicken des Buttons nicht das befüllte Dokument geöffnet wird, sondern sofort befüllt gedruckt wird. Ist dies möglich? Und wenn ja, wie stelle ich den Code um? Confused

Vielen Dank schon mal für Eure Hilfe!

Grüße
Lissy
Marsupilami72
Office-VBA-Programmierer


Verfasst am:
07. Okt 2013, 11:36
Rufname:
Wohnort: Goslar


Re: per Button erstelltes Word Dokument sofort drucken - Re: per Button erstelltes Word Dokument sofort drucken

Nach oben
       Version: Office 2010

Versuchs mal so:

Code:
Private Sub btnRücklauf_Click()
Set objWord = CreateObject("Word.Application")
    With objWord
        .Visible = False
        .Documents.Open "H:\Rückgabe.doc"
        .ActiveDocument.Bookmarks("Straße").Select
        .Selection.Text = Me!Straße
        .ActiveDocument.Bookmarks("PLZ").Select
        .Selection.Text = Me!PLZ       
        .PrintOut
    End With
    Set objWord = Nothing
End Sub


Ist jetzt nicht getestet, sollte aber so funktionieren - die optionalen Parameter zur PrintOut-Methode findest Du in der Online-Hilfe.

_________________
Gruß,
Martin

Bitte keine Fragen per PN - dafür ist das Forum da!
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Tabellenverknüpfungsmanager per code aufrufen 2 blicki 1392 19. Dez 2006, 12:06
blicki Tabellenverknüpfungsmanager per code aufrufen
Keine neuen Beiträge Access Tabellen & Abfragen: Per Dropdownliste neue Sätze anlegen? 1 Gast 689 28. Nov 2006, 10:18
GJ Per Dropdownliste neue Sätze anlegen?
Keine neuen Beiträge Access Tabellen & Abfragen: TabellenVerknüpfung per VBA ändern 2 frantiC 5325 25. Okt 2006, 23:18
Willi Wipp TabellenVerknüpfung per VBA ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Tabellenerstellung per VBA Eingabe erforderlich auf "Ne 3 blicki 1787 27. Sep 2006, 06:50
blicki Tabellenerstellung per VBA Eingabe erforderlich auf "Ne
Keine neuen Beiträge Access Tabellen & Abfragen: Textfelder (Inhalt Zahlen) per inner join verknüpfen 4 FA 3201 27. Jul 2006, 06:37
Gast Textfelder (Inhalt Zahlen) per inner join verknüpfen
Keine neuen Beiträge Access Tabellen & Abfragen: Per Abfrage Zeilenwerte aus einer Tabelle in mehren Spalten 2 missionhro 806 24. Jul 2006, 12:13
missionhro Per Abfrage Zeilenwerte aus einer Tabelle in mehren Spalten
Keine neuen Beiträge Access Tabellen & Abfragen: OLE-Objekt per VBA verknüpfen 8 chris1337 9666 13. Apr 2006, 16:22
chris1337 OLE-Objekt per VBA verknüpfen
Keine neuen Beiträge Access Tabellen & Abfragen: per Abfrage gleich 50 Datensätze anfügen? 1 Nicole_Mehnert 791 03. Apr 2006, 19:25
Nouba per Abfrage gleich 50 Datensätze anfügen?
Keine neuen Beiträge Access Tabellen & Abfragen: Löschabfrage als Button 2 Freund 981 10. März 2006, 15:16
Freund Löschabfrage als Button
Keine neuen Beiträge Access Tabellen & Abfragen: Tabellen per update verändern??? 5 segel12 1606 22. Aug 2005, 07:49
stpimi Tabellen per update verändern???
Keine neuen Beiträge Access Tabellen & Abfragen: Buchverwaltung per Access 2 Rumpel29 7473 30. Mai 2005, 17:34
Ramespure Buchverwaltung per Access
Keine neuen Beiträge Access Tabellen & Abfragen: Access Abfrage per Stichtag 3 Teresa 1711 16. Mai 2005, 13:26
jens05 Access Abfrage per Stichtag
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel-Formeln