Logo Ein-/Ausblenden
Andreas Breuer
nur bei Bedarf mit ausgedruckt wird. Wie mach ich das ?
Gruß,
Andreas
Thomas Löwe
in der Version 97 kannst du dies über die Option
"Zeichnungsobjekte" im Abschnitt "Mit dem Dokument drucken"c auf
der Registerkarte "Drucken" im Menü "Extras, Optionen" erreichen.
Du kannst diese auch automatisieren, indem du es über ein Makro
aufzeichnest.
Benötigst du weitere Hilfe, melde dich hier noch einmal.
--
Schöne Grüße
Thomas Löwe
Alle E-Mails auf pgp-...@young-world.com werden auf dem Server
gelöscht.
Persönliche E-Mails auf pgp-...@young-world.com mit dem Betreff
"Word-Support"
werden gelesen und beantwortet.
Andreas Breuer schrieb in Nachricht <3677D9ED...@gmx.net>...
Andreas Breuer
leider bezieht sich Dein Vorschlag auf alle Grafiken im Dokument. Habe
ich also außer dem Firmenlogo noch weiter Grafiken im Dokument, würden
diese auch nicht ausgedruckt. Gibt es noch einen anderen Weg ?
Gruß, Andreas
Christian Freßdorf
>Ich möchte eine Grafik in einer Worddatei ein-/ausblenden, so daß sie
>nur bei Bedarf mit ausgedruckt wird. Wie mach ich das ?
kein Problem:
Zeichne Dir folgendes Makro auf:
-markiere das Logo (nicht über den Text legen!)
-Format -> Zeichen -> Verborgen
- evtl den Text unterhalb des ausgeblendeten Logos wieder mit
Absatzmarken an die richtige Stelle setzten
- Datei drucken
- evtl. eingefügte Absatzmarken löschen
- Logo wieder einblenden
Damit Du das Logo besser ansprechen und somit markieren kannst,
solltest Du es in einen Positionsrahmen oder eine Tabellenzelle setzen
und vor das Logo eine Textmarke. So kannst Du über den Sprung zur
Textmarke und anschließender Markierung der Tabellenzelle einfach das
Logo wieder einblenden.
Folgendes Makrogerüst sollte Dir dabei helfen, wobei das Logo in einer
Tabelle, die sich in einer Textbox befindet, eingefügt ist.
Selection.Bookmarks.Add Name:="aktuelleposition"
Selection.GoTo what:=wdGoToBookmark, Name:="Logo"
Selection.Tables(1).Select
With Selection.Font
.Hidden = True
End With
' Hier sollten die Absatzmarken eingefügt werden
Application.Dialogs(wdDialogFilePrint).Show
' Zeigt die "Drucken"-Dialogbox an
Selection.GoTo what:=wdGoToBookmark, Name:="Logo"
Selection.Tables(1).Select
With Selection.Font
.Hidden = False
End With
Selection.GoTo what:=wdGoToBookmark, Name:="aktuelleposition"
Selection.Bookmarks("aktuelleposition").Delete
Gruß, Christian
Alexandra von Cube
bei Thomas Vorschlag verrutscht dann eventuelle der Text. Das kommt
drauf an, wie Du die Graphik eingebunden hast. Eine andere Moeglichkeit,
Graphiken nicht mitzudrucken, hat letztens mal jemand hier
vorgeschlagen: In Format Graphikformatieren -> die Helligkeit auf 100 %
setzen.
Alexandra
Thomas Löwe wrote:
>
> Hallo,
>
> in der Version 97 kannst du dies über die Option
> "Zeichnungsobjekte" im Abschnitt "Mit dem Dokument drucken"c auf
> der Registerkarte "Drucken" im Menü "Extras, Optionen" erreichen.
> Du kannst diese auch automatisieren, indem du es über ein Makro
> aufzeichnest.
>
> Benötigst du weitere Hilfe, melde dich hier noch einmal.
>
> --
> Schöne Grüße
>
> Thomas Löwe
> Alle E-Mails auf pgp-...@young-world.com werden auf dem Server
> gelöscht.
> Persönliche E-Mails auf pgp-...@young-world.com mit dem Betreff
> "Word-Support"
> werden gelesen und beantwortet.
>
> Andreas Breuer schrieb in Nachricht <3677D9ED...@gmx.net>...
> >Ich möchte eine Grafik in einer Worddatei ein-/ausblenden, so daß
> sie
> >nur bei Bedarf mit ausgedruckt wird. Wie mach ich das ?
> >
> >Gruß,
> >Andreas
> >
Axel Mayer
Du definierst eine Zeichen-Formatvorlage zu diesem Zweck.
Das Bild formatierst Du mit dieser Vorlage. Es können auch mehrere
Bilder gleichzeitig sein.
Wenn Du die Bilder nun nicht drucken willst, änderst Du die Vorlage auf
"verborgen". Die Bilder werden nicht mehr gemalt.
Teure Weihnachtsgeschenke . . .
Axel
Andreas Breuer wrote:
>
> Ich möchte eine Grafik in einer Worddatei ein-/ausblenden, so daß sie
> nur bei Bedarf mit ausgedruckt wird. Wie mach ich das ?
>
> Gruß,
> Andreas
--
Axel Nikolaus Mayer
Technical Writer & Hypertext Systems
LMS Durability Technologies GmbH
Luxemburger Straße 7
D-67657 Kaiserslautern, Germany
phone: +49 631 4166 113
fax: +49 631 4166 166