Um einen um ein einziges Wort oder eine bestimmte zu legen, muss unter WinWord 95 folgendes Makro eingegeben werden:
Sub MAIN
Länge = Len(Markierung$())
EinfügenFeldzeichen
Einfügen "formel \x ("
ZeichenRechts Länge
Einfügen ")"
BearbeitenLöschen
FelderAkualisieren
End Sub
Anschließend: "Datei - schließen" mit "Ja" beantworten. Jetzt kann im Text das einzurahmende Wort markiert und das Makro aufgerufen werden. Solle in der Layout-Ansicht keine korrekte Darstellung des Rahmens erscheinen, einmal die Tastenkombination "ALT" und "F9" gleichzeitig drücken. Tipp: Makro in die Symbolleiste aufnehmen (vgl. WinWord-Tipp 006 b, c, e und g).
Unter WinWord 97 lautet das Makro wie folgt:
Selection.Cut
Selection.TypeText Text:=" "
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, _
PreserveFormatting:=False
Selection.TypeText Text:="Formel \X("
Selection.Paste
Selection.TypeText Text:=")"
Selection.Delete Unit:=wdCharacter, Count:=1
Selection.Fields.Update
Selection.MoveRight Unit:=wdCharacter, Count:=1