Kalender forever

Teil 7: VBA: Geburts-/Festtagskalender

Das Makro BildWählen ist mit der gleichnamigen Symbolschaltfläche verknüpft. Es markiert die aktuelle Grafik (über die Textmarke "Bild") und ruft dann das Word-eigene Dialogfeld zum Einfügen von Grafiken auf. Sobald der Anwender die gewünschte Grafikdatei gewählt und die OK-Schaltfläche des Dialogs betätigt hat (If .Display = -1 Then), fügt das Makro die Grafik anstelle der aktuellen Markierung in das Dokument ein.

VBA: Geburts-/Festtagskalender

© Archiv

Bildauswahl: Mit wenigen Mausklicks fügen Sie dem Monatskalender ein Foto oder eine Grafik Ihrer Wahl hinzu.

Die Argumente der dafür zuständigen AddPicture- Methode sorgen für eine vollständige Übernahme der Bildinhalte, was eine Weitergabe des Kalenderdokuments ohne die Grafikdatei ermöglicht. Damit das Makro auch künftig auf die eingefügte Grafik zugreifen kann, hinterlegt es diese zum Abschluss seiner Tätigkeit wieder mit der Textmarke Bild.

Ein Klick auf die Kalender-speichern-Schaltfläche in der Symbolleiste aktiviert das gleichnamige Makro. Es ruft das Word-eigene Dialogfeld zum Speichern von Dokumenten auf. Den vorgeschlagenen Dateinamen setzt das Makro aus dem Präfix Monatskalender_, dem zweistellig formatierten Monat, einem Unterstrich sowie dem vierstelligen Jahr des aktuellen Kalenders zusammen.

Im Falle des Kalenders für den Januar 2004 lautet der vorgeschlagene Dateiname also Monatskalender_ 01_2004.doc. Sobald der Anwender das Dialogfeld mit der Speichern- Schaltfläche schließt, sichert die SaveAs-Methode das Dokument mit dem gestalteten Kalenderblatt unter dem angegebenen Dateinamen. : tr

Mehr zum Thema

Netflix
Streaming

Preise, kompatible Geräte, Datenrate, Serien- und Filmangebot von Netflix: Wir beantworten die wichtigsten Fragen rund um den Streaming-Dienst.
Amazon Blitzangebote
Technik-Deals

Die Highlights der Amazon Blitzangebote - heute mit Weihnachts-Angebote-Woche, Netgear-NAS, 57 Prozent auf Heimkino-Produkte und mehr.
Tipps zum leisen PC
Tipps und Tricks

Die Komponenten eines PCs erzeugen Hitze. Lüfter sorgen meist für eine lästige Geräuschkulisse. Mit unseren Tricks wird Ihr PC flüsterleise.
SSD Mythen Tipps
Solid State Disk

SSD-Tuning - was ist wahr, was ist falsch? Wir verraten, welche SSD-Mythen Sie vergessen können und welche Tipps wirklich helfen.
Urlaubsbilder
Fotografieren im Sommer

Von Sommerlicht bis Sonnernuntergang: Unsere 7 Tipps verraten, wie Sie Urlaubsfotos richtig machen und schöne Bilder mit nachhause bringen.