Makro erstellen

  • geschlossen
  • Problem

Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

  • Makro erstellen

    hey!

    Ich wollt mal kurz fragen wie ich ein in Word ein Makro erstelle, das einem Dokument automatisch eine Fußzeile hinzufügt.
    wäre super wenn mir das schnell einer helfen könnte!

    vielen dank
  • Oje, das sind ja denn mal Angaben, da kann man einen Roman drauf schreiben.
    :D


    Welche Word-Version?
    Soll das Makro nur in einer Vorlage oder im Standard laufen?
    Wie soll das Makro gestartet werden?
    Hast du überhaupt schon mal mit Makros im Word gearbeitet?
    und, und, und...... ;)

    Die einfachste Methode ist das Aufzeichnen des Makros mit dem Makrorekorder.
    Anschliessend mit ALT + F11 in den VisualBasic-Editor wechseln und dort je nach Bedarf anpassen.

    Hier mal als Beispiel ein kleines Makro das die Seite, Datum und Uhrzeit in die Fusszeile einfügt.

    Quellcode

    1. Sub Fusszeile()
    2. ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
    3. If Selection.HeaderFooter.IsHeader = True Then
    4. ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
    5. Else
    6. ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
    7. End If
    8. Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldPage
    9. Selection.TypeText Text:=vbTab
    10. Selection.TypeText Text:=vbTab
    11. Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldDate
    12. Selection.TypeText Text:=", "
    13. Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldTime
    14. ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
    15. End Sub
    Alles anzeigen
    [FONT="Comic Sans MS"][SIZE="3"][COLOR="DarkOrange"]---> Fehler sind da, um gemacht zu werden <---[/color][/SIZE][/FONT]