Hallo Thomas,
Am 2011-08-04 20:07, schrieb ich_der_n...@habmalnefrage.de:
Hallo!
Steige gerade von Microsoft Office auf LibreOffice um (LibreOffice 3.4.2 /
OOO340m1 - Build:203), und habe jetzt eine Ewigkeit lang nach einer Lösung für
dieses Problem gesucht:
Ich möchte Sonderzeichen Tastaturkürzel zuzuweisen, d. h. das Drücken einer
Tastaturkombination soll automatisch ein ganz bestimmtes Sonderzeichen
einfügen. (In meiner Arbeit brauche ich nämlich unbedingt die Möglichkeit,
bestimmte fremdsprachige Texte flüssig in lateinischer Schrift mit Diakritika
einzutippen; die Schriftarten dafür habe ich natürlich schon.)
Habe im Menü Anpassen/Tastatur gesucht, aber da kann ich nur Befehlen, Makros und
Vorlagen Tastaturkürzel zuweisen. Im Menü Einfügen -> Sonderzeichen fehlt die
Möglichkeit, Tastaturkürzel zuzuweisen (in Microsoft Word hat man sie an genau
dieser Stelle).
Wie mache ich das also?
Schon mal vielen Dank& Grüße -
Thomas
Hatte vor Kurzem das selbe Problem wie du bei einer Bekannten die das Å
und å auf ihrer Tastatur haben wollte.
Habe es folgendermaßen gelöst (ähnlich der Methode von Regina)
1. Makros aufzeichnen erlauben (Extras->Optionen->Allgemein und das
Häkchen bei Aktiviere experimentelle Funktionen setzen)
2. Extras->Makros->Aufzeichnen
3. Einfügen->Sonderzeichen und das entsprechende Zeichen suchen
4. Aufzeichnen beenden. Im folgendem Dialog auf "Neues Modul" klicken,
und einen sprechenden, eindeutigen Namen vergeben.
5. Extras->Makros->Verwalten->LibreOffice und das entsprechende Makro
unter Meine Makros->Standard markieren, bearbeiten
6. Die Zeilen vor args1(1). auskommentieren (sonst wird der eingestellte
Fontname geändert.
Es müsste jetzt ungefähr so aussehen:
REM ***** BASIC *****
sub Main
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dim args1(1) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Symbols"
args1(0).Value = "Å"
rem args1(1).Name = "FontName"
rem args1(1).Value = "Times New Roman"
dispatcher.executeDispatch(document, ".uno:InsertSymbol", "", 0, args1())
end sub
6. Extras->Anpassen->Tastatur und einen freien Tastencode suchen (in
diesem Beispiel habe ich Alt+Strg+Umschalt+A gewählt,
Bereich: LibreOfficeMakros->usr->standard
Funktion: bleibt auf main
und auf Ändern drücken.
Ab sofort ist mit dieser Tastenkombination das Sonderzeichen verfügbar
(Alt+Stgr ist übrigens identisch mit AltGr)
Ich weiß, es ist etwas umständlich, aber so funktioniert es
Grüße
Wolfgang
--
Informationen zum Abmelden: E-Mail an users+h...@de.libreoffice.org
Tips zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert
