Office - Word, Excel und Co. 9.753 Themen, 41.597 Beiträge

Verfolgung starten Optionen

Word Druckvorbereitung, Seriendruck von Excel

Wiesner / 6 Antworten / Baumansicht Nickles

Servus zusammen,

in unserer Firma bekommen wir in letzter Zeit von einigen Vereinen Word Druckaufträge.
Da diese Dokumente von Laien erstellt werden, müssen wir die die eingefügten Bilder immer wieder überarbeiten, sonst werden diese für einen Seriendruck zu groß.
Die Word Dateien sind Text mit mehreren Megabyte großen Bildern = Bild unbearbeitet via Drag & Drop reingezogen.

Denn wenn ich das Dokument direkt schicken würde, wäre das Dokument im Windows Spooler vor unserer Feiry schon mehrere Gigabyte groß.
Das Anpassen verschlingt aber viel Zeit.
Ein Umwandeln in PDF ergibt dasselbe Problem -> Windows geht in die Knie.

Habt ihr einen Tipp wie man das Anpassen von übergroßen Grafiken beim Orginal automatisieren könnte?

Danke für eure Tipps

bei Antwort benachrichtigen
gelöscht_101060 Wiesner „Word Druckvorbereitung, Seriendruck von Excel“
Optionen

Servus Wiesner,

wären die Tipps hier für Dich vielleicht hilfreich?

http://office.microsoft.com/de-de/word-help/verringern-der-grosse-von-bilddateien-HA010192200.aspx

BG,

Bergi2002

bei Antwort benachrichtigen
peterson Wiesner „Word Druckvorbereitung, Seriendruck von Excel“
Optionen

Ich kann Dir nur sagen, wie Du Bilder ohne Word anpassen kannst.

Mit TinyPic.


http://www.chip.de/downloads/TinyPic_27755921.html

bei Antwort benachrichtigen
Wiesner Nachtrag zu: „Word Druckvorbereitung, Seriendruck von Excel“
Optionen

@Bergi, @peterson,
leider ist dies nicht das ganz richtige.
Ich suche die Möglichkeit bei einer vorhandenen WordDatei die darin enthaltenen Bilder verkleinern.
Die Fussmethode ist leider sehr zeitaufwändig.

Ein Makro oder eine externe Software die die *.doc(x) öffnen kann und die Bilder nach mit einem Argument verkleinert (dpi + Größe) wäre so mein Gedanke.

bei Antwort benachrichtigen
peterson Wiesner „@Bergi, @peterson, leider ist dies nicht das ganz richtige. Ich suche die...“
Optionen

http://rixdorfer.be.schule.de/arbeitshilfen/office/bilder-in-worddokument-verkleinern-auf-einen-rutsch


oder dieses:

Das geht in Word 2003 schnell und einfach. Mit der rechten Maustaste auf ein beliebiges Bild klicken und im Kontextmenue 'Grafik formatieren' auswaehlen. Im naechsten Fenster 'Alle Bilder im Dokument' auswaehlen. Die Gruppe 'Aufloesung aendern' nach eigenem Bedarf auswaehlen. Wichtig ist der Punkt 'zugeschnittene Bildbereiche loeschen'. Dieser entfernt die verdeckten Bildbereiche, das verkleinert das Worddokument manchmal erheblich.

bei Antwort benachrichtigen
Bäuerle1 Wiesner „@Bergi, @peterson, leider ist dies nicht das ganz richtige. Ich suche die...“
Optionen

Hallo Wiesener,

schau Dir mal folgendes an zum Export:
ungetestet:
http://www.add-in-world.com/katalog/word-grafass/

einmal in w2010 getestet: war ok:
http://www.office-loesung.de/ftopic433998_0_0_asc.php

anschliessend
per Stapelverarbeitung die Bilder scalieren.

dann folgender Code: abgewandelt gefunden in: www.office-loesung.de

Sub fuegein()

Dim Pfad
Dim Dateiname As String
Dim Breite As Integer
Dim Hoehe As Integer
Dim Hoehe_Max As Integer
Dim Skalierungsfaktor As Double

Pfad = "D:\Rennen\" ' CurDir hier wieder den Pfad anpassen
Set MyShapes = ActiveDocument.InlineShapes
MyCou = MyShapes.Count
For MyZahl = 1 To MyCou

With Dialogs(wdDialogFileOpen)
.Name = Pfad
If .Display = -1 Then
Dateiname = .Name
End If
If Dateiname = "" Then
Exit Sub
End If
End With
Set bild = ActiveDocument
ActiveDocument.InlineShapes().Item(MyZahl).Select

Selection.InlineShapes.AddPicture Pfad & Dateiname, SaveWithDocument:=True
Dateiname = ""

Next
End Sub

viel Spass beim testen

Andy


bei Antwort benachrichtigen
Wiesner Bäuerle1 „Hallo Wiesener, schau Dir mal folgendes an zum Export: ungetestet:...“
Optionen

Danke erst mal, ich werde in den nächsten Tage eure Vorschläge mal testen.

bei Antwort benachrichtigen