Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Kopf- und Fusszeile nicht mitdrucken!!

Frage Microsoft Microsoft Office

Mitglied: ruben

ruben (Level 1) - Jetzt verbinden

18.04.2005, aktualisiert 30.05.2005, 18359 Aufrufe, 2 Kommentare

Hallo zusammen.
Ich habe ein Problem und zwar weiss ich einfach nicht wie ich es anstellen soll, dass meine Kopf und Fußzeile NICHT mitgedruckt werden.
Ich habe im Hintergrund(Kopf und Fußzeile) eine Grafik hinterlegt welche ich aber nicht ausgedruckt haben möchte(geht über die komplette Seite), da ich diese Grafik schon vorgedruckt habe. Ich möchte sie lediglich in meinem Word-Doukument sehen, wenn ich dieses bearbeite.
Kann ruhig auch eine Vba-Lösung sein, dann aber mit Code .

Wäre für eure Hilfe echt unendlich dankbar.

Gruß ruben
Mitglied: ruben
30.05.2005 um 08:23 Uhr
so, nu hab ich was gefunden wie es geht.

Hallo,

Ich habe mich mal an der Frage versucht. Da mir nicht klar ist ob das Dokument auch gespeichert wird habe ich keine Befehle eingebaut.
Einfach direkt mit mir in Verbindung setzen und dann schauen wir weiter

Code:

Code:
Sub Test_Kopf_fußzeile()
' Erster Versuch für Drucksteuerung
' Erster Teil: Aufrufen der Kopfzeile oder Schliessen wenn offen
If ActiveWindow.View.SplitSpecial <> wdPaneNone Then
ActiveWindow.Panes(2).Close
End If
If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _
ActivePane.View.Type = wdOutlineView Then
ActiveWindow.ActivePane.View.Type = wdPrintView
End If
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
' Alles makieren
Selection.WholeStory
' Makierung löschen
Selection.Delete Unit:=wdCharacter, Count:=1
' Wechsel zwischen Kopf <-> Fußzeile
If Selection.HeaderFooter.IsHeader = True Then
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
Else
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
End If
' Alles makieren
Selection.WholeStory
' Makierung löschen
Selection.Delete Unit:=wdCharacter, Count:=1
' Kopf/Fußzeile verlassen
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument

End Sub





Hallo axyris,

ich habe mir ein komplettes Makro einfallen lassen das ein temporäres Dokument erzeugt. Ich gebe zu es ist einwenig "durch die Brust ins Auge" aber es funktioniert. Das Marko muss in die Normal.DOT und dann einfach eine Schaltfläche in eine der Symbolleisten. Falls die Fußzeile erhalten bleiben soll einfach mit Hochkomma "ausklammern"



Code:
Sub Test_Kopf_fußzeile()

' Zweiter Versuch für Drucksteuerung
' Erster Teil: neus Dokument erstellun und die Daten einfügen
Selection.WholeStory
Selection.Copy
Documents.Add DocumentType:=wdNewBlankDocument
Selection.PasteAndFormat (wdPasteDefault)

' Zweiter Teil: Aufrufen der Kopfzeile oder Schliessen wenn offen
If ActiveWindow.View.SplitSpecial <> wdPaneNone Then
ActiveWindow.Panes(2).Close
End If
If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _
ActivePane.View.Type = wdOutlineView Then
ActiveWindow.ActivePane.View.Type = wdPrintView
End If
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader

' Alles makieren
Selection.WholeStory

' Makierung löschen
Selection.Delete Unit:=wdCharacter, Count:=1

' Dritter Teil: Wechsel zwischen Kopf <-> Fußzeile
If Selection.HeaderFooter.IsHeader = True Then
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
Else
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
End If

' Alles makieren
Selection.WholeStory

' Makierung löschen
Selection.Delete Unit:=wdCharacter, Count:=1
' Vierter Teil:Kopf/Fußzeile verlassen
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument

' Fünfter Teil: Drucken
ActiveDocument.PrintOut

' Sechster Teil: Schließen des Bereinigten Dokuments
ActiveWindow.Close (wdDoNotSaveChanges)

End Sub


Ich hoffe es hilft
Gruß
Martin

Nach oben



Hallo axyris,

Erstelle eine Formatvorlage mit dem Namen Unsichtbar und dem Formatvorlagentyp Zeichen.
Dann setze für diese Formatvorlage unter Format - Schriftart den Haken bei Ausgeblendet (nicht verwirren lassen, das ganze gilt auch für Bilder).

Das Ergebnis ist, dass der gesamte mit Unsichtbar formatierte Inhalt (Bilder, Texte, etc.) nicht gedruckt wird.

Wenn du das Makro unten startest wird alles, auch der unsichtbare Teil gedruckt.


Code:
Sub UnsichtbarDrucken()
'
' UnsichtbarDrucken Makro
' Makro zum Drucken von Inhalten der Formatvorlage 'Unsichtbarr'
' Version 1.0
' Erstellt 2204-11-03

With ActiveDocument.Styles("Unsichtbar").Font
.Hidden = False
End With

Dialogs(wdDialogFilePrint).Show

With ActiveDocument.Styles("Unsichtbar").Font
.Hidden = True
End With

End Sub



Viel Spaß damit
Bitte warten ..
Mitglied: Dagmar1970
14.03.2016 um 13:23 Uhr
Wo genau gibt man das ein?

Kannst Du das genau beschreiben?

Ich erstelle gerade so eine Vorlage und es wäre mir sehr hilfreich.
Bitte warten ..
Ähnliche Inhalte
Outlook & Mail
Outlook 2016 Variablen beim Drucken in Kopf- und Fusszeile funktionieren nicht, da deutsch
Frage von FalaffelOutlook & Mail1 Kommentar

Guten Tag, wir installieren gerade bei einigen Anwendern Office 2016 testweise. Wenn die jetzt in Outlook ein Email oder ...

VB for Applications
Excel - VBA - Fusszeile Text und Grafik
gelöst Frage von JuckieVB for Applications1 Kommentar

Guten Morgen an alle, in Excel gibt es ja die Möglichkeit, die Fußzeile per VBA zu "gestalten". Die Fußzeile ...

VB for Applications
Fusszeile mit PageSetup mit VBA in Excel Makro funktioniert nicht?
Frage von HerrHartVB for Applications5 Kommentare

Ich habe eine Fusszeile mit dem Macro Recorder unter Excel 2013 aufgenommen: With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = ...

Microsoft Office
Excel: Duplikate entfernen - Brett vorm Kopf
gelöst Frage von YannoschMicrosoft Office1 Kommentar

Hallo zusammen, ich bin noch am verzweifeln hier! Ich bin mal wieder eine massiv große Telefonliste in Excel am ...

Neue Wissensbeiträge
Verschlüsselung & Zertifikate

19 Jahre alter Angriff auf TLS funktioniert immer noch

Information von BassFishFox vor 1 StundeVerschlüsselung & Zertifikate

Interessant zu lesen. Der Bleichenbacher-Angriff gilt unter Kryptographen als Klassiker, trotzdem funktioniert er oft noch. Wie wir herausgefunden haben, ...

Windows 10

Windows 10 Fall Creators Update - Neue Funktion Hyper-V Standardswitch kann ggf. Fehler bei Proxy Configs verursachen

Erfahrungsbericht von rzlbrnft vor 12 StundenWindows 102 Kommentare

Hallo Kollegen, Da wir die Gefahr lieben, haben wir bei einigen Usern nun mittlerweile das Creators Update drauf. Einige ...

Sicherheit

TLS-Zertifikat und privater Schlüssel von Microsofts Dynamics 365 geleakt

Information von Penny.Cilin vor 14 StundenSicherheit

Microsoft hat versehentlich das TLS-Zertifikat inklusive dem privaten Schlüssel seiner Business-Anwendung Dynamics 365 geleakt. TLS-Zertifikat und privater Schlüssel von ...

Viren und Trojaner

Deaktivierter Keylogger in HP Notebooks entdeckt

Information von bitcoin vor 1 TagViren und Trojaner3 Kommentare

Ein Grund mehr warum man Vorinstallationen der Hersteller immer blank bügeln sollte Der deaktivierte Keylogger findet sich im vorinstallierten ...

Heiß diskutierte Inhalte
Netzwerkmanagement
Firefox Profieles im Roaming
gelöst Frage von Hendrik2586Netzwerkmanagement17 Kommentare

Hallo liebe Leute. :) Ich hab da ein kleines Problem, welches anscheinend nicht unbekannt ist. Wir nutzen hier in ...

Netzwerkmanagement
NAS über zwei weitere Ethernet Anschlüsse verbinden
gelöst Frage von Sibelius001Netzwerkmanagement16 Kommentare

Sorry - ich bin hier wahrscheinlich als kompetter IT Trottel unterwegs. Aber eventuell kann mir jemand ganz einfach helfen: ...

LAN, WAN, Wireless
Häufig Probleme beim Anmelden in WLAN
Frage von mabue88LAN, WAN, Wireless15 Kommentare

Hallo zusammen, in einem Netzwerk gibt es relativ häufig (1-2 mal pro Woche) Probleme mit der WLAN-Verbindung. Zunächst mal ...

Netzwerkgrundlagen
Hi eine blöde frage. xD
Frage von 132954Netzwerkgrundlagen13 Kommentare

Also: Habe 2012 r2 essentials neuinstalliert, allerdings installiert diese version ja gleich diesen gangen AD kram mit, den hab ...