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
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)