Seite 1 von 1
Kommentarfunktion: Schriftgröße für ganzes Dokument ändern
Verfasst: Mo 12. Jun 2023, 15:20
von Naturi
Hallo
gibt es eine Möglichkeit die Schriftgröße der Kommentare fürs ganze Dokument oder sogar allgemein für Calc zu ändern? Oder geht das nur für jeden Kommentar extra, was leider sehr umständlich ist.
Re: Kommentarfunktion: Schriftgröße für ganzes Dokument ändern
Verfasst: Mo 12. Jun 2023, 17:07
von miesepeter

- AlleKommentareFormatieren.png (26.11 KiB) 1105 mal betrachtet
Re: Kommentarfunktion: Schriftgröße für ganzes Dokument ändern
Verfasst: Mo 12. Jun 2023, 18:22
von Naturi
Danke für deine Bemühungen,
gefragt habe ich, wie man es bei LO-Calc macht, nicht bei Writer.
Bei Calc muss das anders gehen, aber ich kann nicht herausfinde, wie.
Re: Kommentarfunktion: Schriftgröße für ganzes Dokument ändern
Verfasst: Mo 12. Jun 2023, 18:57
von mikele
Hallo,
ich glaube, dass es dafür keine EInstellung gibt (im Gegensatz zu Writer). Am schnellsten wäre es, ein Makro dafür zu bauen.
Code: Alles auswählen
Sub Main
oDoc=ThisComponent
for i=0 to oDoc.Sheets.Count-1
oTab=oDoc.Sheets(i)
for k=0 to oTab.Annotations.Count-1
oAnn=oTab.Annotations(k)
oTxt=oAnn.Text
oTxt.charheight=14
next
next
End Sub
Re: Kommentarfunktion: Schriftgröße für ganzes Dokument ändern
Verfasst: Mo 12. Jun 2023, 19:09
von Naturi
Hm...
danke! Leider verstehe ich jetzt davon so gut wie sehr wenig. Mit Makros habe ich noch nie was gemacht.
Heißt das, den Code einfach in ein Terminal eingeben und abschicken oder muss dazu noch mehr gemacht werden?
Re: Kommentarfunktion: Schriftgröße für ganzes Dokument ändern
Verfasst: Mo 12. Jun 2023, 21:39
von miesepeter
Oh, hatte ganz überlesen, dass sich die Anfrage auf Calc bezog. In Calc selbst fand ich keine Möglichkeit der Änderung; auch nicht in
Menü Extras | Optionen | LibreOffice | Erweitert | Experteneinstellungen
Es bleibt wohl nur der Ansatz von @mikele über ein Makro.
Ciao
Re: Kommentarfunktion: Schriftgröße für ganzes Dokument ändern
Verfasst: Di 13. Jun 2023, 12:24
von mikele
Hallo,
um das Makro zu nutzen, gehst du über
->Extras->Makros->Makros verwalten->Basic
Im Dialog wählst du bei "Makros aus" unter "Meine Makros" die Bibliothek "Standard" und klickst auf "Module1" und dann auf die Schaltfläche bearbeiten. Damit landest du in der Oberfläche (IDE) für die Basic-Makros.
Hier fügst du das Makro ein.
Code: Alles auswählen
Sub kommentare_schrift
eingabe=inputbox("Schriftgröße: ", "Kommentare","12")
grad=int(eingabe)
if grad>0 and grad<30 then
oDoc=ThisComponent
for i=0 to oDoc.Sheets.Count-1
oTab=oDoc.Sheets(i)
for k=0 to oTab.Annotations.Count-1
oAnn=oTab.Annotations(k)
oTxt=oAnn.Text
oTxt.charheight=grad
next
next
end
End Sub
Ich habe es mal um eine Eingabe ergänzt, sodass die gewünschte Schriftgröße eingegeben werden kann (ganzzahlig, nur bei >0 und <30 erfolgt eine Änderung).
Das Makro kannst du nun über ->Extras->Makros->Makros ausführen auswählen und ausführen oder auch ein Symbol in einer Symbolleiste dafür anlegen (->Extras->Anpassen->Symbolleisten)