Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
26.04.2024 15:27:20
Excel öffnet nach Auswahl einer Excel diese leer
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1016to1020
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1016to1020
1016to1020
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Word aus Excel drucken

Word aus Excel drucken
26.10.2008 00:28:00
Alexander
Hallo,
ich kann jetzt erfolgreich Daten aus Excel in eine Word Vorlage einfügen:

Private Sub CommandButton1_Click()
Dim wordobj As Object, worddoc As Object
Dim Vorlage As String
Set wordobj = CreateObject("Word.application")
Vorlage = Application.ThisWorkbook.Path & "\Vorlage.dot"
Set worddoc = wordobj.Documents.Add(template:=Vorlage)
Sheets("Daten").Range("A2").Value = Sheets("Daten").Range("A11").Value
Sheets("Daten").Range("B2").Value = Sheets("Daten").Range("B11").Value
Sheets("Daten").Range("C2").Value = Sheets("Daten").Range("C11").Value
Sheets("Daten").Range("D2").Value = Sheets("Daten").Range("D11").Value
Sheets("Daten").Range("E2").Value = Sheets("Daten").Range("E11").Value
Sheets("Daten").Range("F2").Value = Sheets("Daten").Range("F11").Value
wordobj.Visible = True
End Sub


wie kann ich das Word-Dukument jetzt drucken lassen und ohne zu speichern schließen?
Vielen Dank für die Hilfe
Alexander

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Word aus Excel drucken
26.10.2008 02:17:00
Daniel
Hi
probier doch einfach mal:
wordobj.PrintOut
Gruß, Daniel
AW: Word aus Excel drucken
26.10.2008 09:03:00
Alexander
Hallo Daniel,
das funktioniert. Danke.
Vor dem Druck kommt die Meldung, "Seitenränder liegen außerhalb des druckbaren Bereiches".
Die Seitenränder müssen aber so eingestellt sein.
Wie kann ich daher diese Fehlermeldung unterdrücken?
Word soll die Fehlermeldung unterdrücken, das Dokument ausdrucken und ohne zu speichern schließen.
Dank für die Hilfe
Alexander
AW: Word aus Excel drucken
26.10.2008 09:34:00
Tino
Hallo,
bezweifle das Dein Code in Word etwas einfügt!?
Versuche es mal so.
  With wordobj
    .Application.DisplayAlerts = False
    .PrintOut
    .Application.DisplayAlerts = True
  End With


Gruß Tino

Anzeige
AW: Word aus Excel drucken
26.10.2008 10:08:00
Alexander
Hallo Tino,
du hast recht. Diese Zeilen
worddoc.FormFields("a1").Result = Sheets("Daten").Range("A2").Value
.
.
habe ich Euch vorenthalten.
Ich konnte die Seitenränder doch anpassen.
mit
worddoc.Close False
kann ich das Dokument auch schließen ohne zu speichern.
Vielen Dank.

299 Forumthreads zu ähnlichen Themen

fehler beim speichern - zellname existiert nicht
t4z

Hallo Leute,
folgendes Problem:
Will nach zahlreichen Änderungen in Datei A die Änderungen darin speichern. Kurz vor Ende des Speichervorgangs kommt dann die Fehlermeldung
"Microsoft Excel kann die Formel in der Zelle (Name:[Dateiname.xls]Tabellenname!solver_val) nicht konvertieren,...
07.08.2008 17:53:00
Thread-ID: 1000056
4 Beiträge
Anzeige
AW: Excel Makro Starten
Matty

Hallo nochmal....
Was ist an meiner Variante falsch?
Ich habe die Dateinamen als String definiert und in der Schleife den String aufgerufen. Was ist an dem Aufruf Application.Run falsch bzw was muss ich anders formulieren, wenn ich möchte dass die dateien entsprechend der Schleife durch...
08.08.2008 07:42:54
Thread-ID: 1000149
2 Beiträge
Lagerverwaltung mit Excel
Ralf

Hallo,
ich habe eine Lagerverwaltungsliste, in Spalte A stehen die Produkte, in Spalte B die Lagerzugänge und in Spalte C die Lagerabgänge.
In jeder Zeile befindet sich immer nur ein Buchungsvorgang, also entweder nur Zugang oder nur Abgang vom Lager.
Ich möchte in Spalte F, die akt...
08.08.2008 09:51:52
Thread-ID: 1000187
4 Beiträge
Anzeige
Sudoku Kontexmenü-Rechts [evtl. Hajo]
Matthias

Hallo
(Level bitte nicht ganz so ernst nehmen)
Folgendes:
In Diese Arbeitsmappe
Option Explicit 'nach einer Idee von Hajo Ziplies 'https://www.herber.de/forum/ _ archiv/972to976/t972675.htm Private Sub Workbook_BeforeClose(Cancel As Boolean) KontextmenueZuruecksetzen End Sub P...
08.08.2008 21:58:35
Thread-ID: 1000418
10 Beiträge
datenimport aus excel in excel
caot

Hi mal wieder!
ich hab mal wieder ne frage:
es sind ca 1200 Excel Dateien aus denen jeweils aus ein paar Zeilen und Spalten die Werte in eine Exceldatei eingelesn werden sollen.
Die Ursprungsdateien sind laufend nummeriert... und dann
kommt noch ein name als nummer- name.xls <...
09.08.2008 11:22:00
Thread-ID: 1000469
3 Beiträge
Zeichenkette per for-next-schleife erstellen
lauer

Hallo,
ich möchte mir eine Zeichenkette erstellen lassen.
Ich habe in einer Zelle (B11) den Anfang (1) angegeben und in der anderen (C11) steht das Ende (49).
Nun möchte ich, dass er mir in der E11 die Zeichenkette reinschreibt.
Also ich möchte dann in E11 stehen haben: 1,2,3,4,...
09.08.2008 19:06:00
Thread-ID: 1000538
5 Beiträge
Word Dokument in Excel einlesen
Silva


Hallo an alle Exceluser,
ich stehe mal wieder vor einer neuen Herausforderung und komme nicht weiter.
Ich habe ca. 100 Worddateien (ALLE gleich aufgebaut). Und ich habe 1 Exceldatei.
Jetzt möchte ich eine definierte Anzahl an Informationen automatisch aus den Worddateien in Exc...
11.08.2008 11:24:00
Thread-ID: 1000766
8 Beiträge
Access update von Excel
Excel

Hi Excel Freaks,
Ich habe folgendes Problem.
Ich habe eine Access Datenbank mit ca. 150000 Artikel und neben den normalen Preisen enthält diese auch selbst erstellte Preise.
Jetzt bekomme ich per Excel einmal im Monat eine aktualisierte Preisliste mit ca. 12000 Artikeln.
Diese j...
11.08.2008 13:28:57
Thread-ID: 1000834
7 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
12
1
3
1
9
2
4
7
6
3
4
3
1
6
2
9
10
4
1
2
1
1
7
15