Automatisch auf Laufwerk A: speichern

Ich verwende Word fⁿr Windows 95 und mu▀ meine Texte oft auf Laufwerk A: speichern, um sie anderen zukommen zu lassen. Jetzt suche ich nach einer M÷glichkeit, diesen Speichervorgang ⁿber eine SymbolschaltflΣche so zu automatisieren, da▀ Word das Dokument automatisch unter dem aktuellen Namen auf Diskette sichert.

Die beste L÷sung fⁿr Sie ist ein kleines Makro, das Sie dann mit einer SymbolschaltflΣche verknⁿpfen k÷nnen. Das Makro mu▀ zunΣchst den aktuellen Dateinamen ermitteln und dann das Dokument auf dem gewⁿnschten Laufwerk speichern. Um das Makro zu schreiben, wΣhlen Sie den Befehl Extras û Makro. Im Feld Makroname geben Sie einen aussagekrΣftigen Namen ein und wΣhlen dann die SchaltflΣche Erstellen. Um das Makro in allen Dokumente benutzen zu k÷nnen, achten Sie bitte darauf, da▀ im Kombinationsfeld Makro aus der Eintrag Alle aktiven Dokumentvorlagen ausgewΣhlt ist. Im Makro verwenden Sie folgende Anweisungsfolge: 

Sub MAIN╢
Dim Dlg As DateiDateiInfo╢
GetCurValues Dlg╢
DateiSpeichernUnter .Name = ôA:\ô + Dlg.DateiName╢
End Sub╢
Zuerst legen Sie eine Variable fⁿr das Speichern der aktuellen Datei-Information an. Dazu eignet sich der vordefinierte Datentyp DateiDateiInfo. Mit der zweiten Anweisung lesen Sie die Datei-Eigenschaften des momentan aktiven Dokuments in die zuvor definierte Variable. Schlie▀lich rufen Sie die Anweisung DateiSpeichernUnter auf. Die Parameter sind so gewΣhlt, da▀ Word die Datei an der mit Name festgelegten Stelle sichert. Gleichzeitig weisen Sie dem Parameter eine Zeichenkette zu, die sich aus dem Ziellaufwerk und dem Namen des Dokuments zusammensetzt. Um das Makro mit einer SymbolschaltflΣche zu verknⁿpfen, wΣhlen Sie anschlie▀end den Befehl Ansicht û Symbolleisten û Anpassen. Im folgenden Dialog wechseln Sie auf die Registerkarte Symbolleisten und markieren in der Auswahlliste Kategorie den Eintrag Makros. Wenn Sie den Namen des Makros markieren und via Drag & Drop einer Symbolleiste hinzufⁿgen, k÷nnen Sie noch ein passendes Symbol fⁿr die neu angelegte SchaltflΣche aussuchen. Sobald Sie die Auswahl mit einem Mausklick auf Schlie▀en bestΣtigt haben, k÷nnen Sie alle Dateien per Knopfdruck auf Laufwerk A: sichern.