Microsoft Excel

Herbers Excel/VBA-Archiv

Word - Fußzeile | Herbers Excel-Forum


Betrifft: Word - Fußzeile von: Markus
Geschrieben am: 05.08.2012 16:08:05

Hallo zusammen,

ich hoffe, hier kann mir einer helfen. Google leitet mich bei Fragen zu Word immer zu diesem Forum....

Ich möchte in die Fußzeile des Word-Dokumentes noch das Datum der letzten Speicherung aufnehmen. Siehe Fettdruck. Allerdings habe ich im großen web nix gefunden, was mir hilft.

Wer kann mir helfen?

Viele Grüße
Markus

Sub Makro2()

    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
    If Selection.HeaderFooter.IsHeader = True Then
        ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
    Else
        ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
    End If
    Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldPage
    Selection.TypeText Text:=" von "
    Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldNumPages
    Selection.TypeText Text:=vbTab & "Letze Speicherung am " & dat
End Sub

  

Betrifft: AW: Word - Fußzeile von: Hajo_Zi
Geschrieben am: 05.08.2012 16:09:43

Hallo Markus,

ein Word Forum wäre hier http://www.ms-office-forum.net/forum/forumdisplay.php?f=30

GrußformelHomepage


  

Betrifft: AW: Word - Fußzeile von: Roland Hochhäuser
Geschrieben am: 05.08.2012 16:42:32

Hallo Markus,

wozu ein Forum, das steht doch im Objekt-Katalog:
ThisDocument.BuiltInDocumentProperties(wdPropertyTimeLastSaved)

Gruß
Roland Hochhäuser


  

Betrifft: Vielen Dank! von: Markus
Geschrieben am: 05.08.2012 16:55:43




Beiträge aus den Excel-Beispielen zum Thema "Word - Fußzeile"