Hallo Leute,
gibt es einen Trick, mit dem man Sonderzeichen in den AutoKorrektur-Ordner einfügen kann ? Konkret - ich möchte einen Namen mit einem hochgestellten © dort haben. Dieses hochgestellte Copyright wird nicht erkannt, ebensowenig kann ich es bei Suchen/Ersetzen eingeben.
Vielen Dank für Eure Antworten
Gruß Jürgen
Hallo Jürgen
Diese Sache ist bereits integriert.
Nachdem Sie © eintippen, sollten diese drei Zeichrn non der AutoKorrektur mit dem gewünschten Zeichen ersetzt werden.
Wnn das bei Ihnen nicht geht, dann überprüfen Sie die EInstellung unter Extras - AutoKorrektur… - AutoKorrektur - während der EIngabe ersetzen.
Wenn dies immer noch nicht geht, suchen Sie nach einer *.acl-Datei und nennen Sie diese um, damit Word beim nächsten Start eine neue AutoCorrect-List erstellen kann.
Dieses Zeiechen finden Sie auch unter Einfügen - Sonderzeichen… - Sonderzeichen.
Auch die Testnkombination [Strg + Alt + c] sollte dieses Zeichen generieren.
Wie sich nach Symbolen in einem Dokument Suchen kännen ist im folegnde Skript erklärt:
http://mypage.bluewin.ch/reprobst/WordFAQ/Symbolse.htm
Gruss
S. Widmer
Hallo Jürgen,
Du könntes Dir, wenn Du den von Silvia aufgezeichneten Weg nicht gehen
möchtest, ein kleines Makro, das über eine short-cut aufgerufen wird,
schreiben, das das Original-Copyright-Zeichen einfügt, verkleinert und
hochstellt, dann wäre der Umweg über Auto-Korrektur nicht mehr notwendig.
Beipiel unten.
Gruß
Wilhelm
Sub Copyright()
Selection.InsertSymbol CharacterNumber:=169, Unicode:=True, Bias:=0
'Fügt das Zeichen ein
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
'Markiert das Zeichen
With Selection.Font 'Verkleinert das Zeichen auf 10 Pkte und stellt es hoch
.Size = 10
.Superscript = True
End With
Selection.MoveRight Unit:=wdCharacter, Count:=1 'Geht eine Position nach
rechts
With Selection.Font 'Vergrößert die Schrift auf 12 Pkte und stellt sie wieder
herunter
.Size = 12
.Superscript = False
End With
End Sub