❤️ Helfen Sie noch heute, unser LibreOffice Forum zu erhalten! ❤️
Unterstützen Sie das LibreOffice-Forum und helfen Sie uns, unser Ziel für 2025 zu erreichen!

🍀 Jeder Beitrag zählt – vielen Dank für Ihre Unterstützung!🍀
Mit Ihrer Spende sichern Sie den Fortbestand, den Ausbau und die laufenden Kosten dieses Forums. 🌱


❤️ DANKE >> << DANKE ❤️

>> Dank Ihrer Unterstützung -> Keine Werbung für alle registrierten LibreOffice-Forum User! <<
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗

Bereich drucken per Makro

Alles zur Programmierung im LibreOffice.
Antworten
wolltiger
Beiträge: 2
Registriert: Do 14. Aug 2025, 15:39

Bereich drucken per Makro

Beitrag von wolltiger » Sa 16. Aug 2025, 12:33

Hallo!
Die Aufgabe ist - dachte ich - einfach: Drucke einen Bereich einer Tabelle per Makro. Selbst das aufgezeichnete Makro funtioniert nicht:
' Bereich drucken
document = ThisComponent.CurrentController.Frame
dim args2(0) as new com.sun.star.beans.PropertyValue
args2(0).Name = "ToPoint"
args2(0).Value = "$A$2:$G$113"
dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args2())
In der letzten Zeile bekomme ich "Basic Laufzeitfehler: Objectvariable nicht belegt"
So geht es auch mit allen anderen Beispielen, die ich in den letzten Wochen im Internet gefunden und ausprobiert habe !!!!!
Hat vielleicht irgendwer ein funktionierendes Beispiel?
Danke

Benutzeravatar
karolus
* LO-Experte *
Beiträge: 2569
Registriert: Fr 10. Dez 2010, 10:01

Re: Bereich drucken per Makro

Beitrag von karolus » Sa 16. Aug 2025, 12:56

Dann ist entweder dein Makro-Aufzeichner kaputt, oder du hast irgendwas an der Aufzeichnung verbastelt? Ich tippe auf letzteres!

Code: Alles auswählen

sub Macro2
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(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "ToPoint"
args1(0).Value = "$C$5:$E$13"

dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args1())


end sub
LO25.2.x.y debian 13(trixie) auf Raspberry5 8GB (64bit)
LO25.8.x.y flatpak debian 13(trixie) auf Raspberry5 8GB (64bit)

wolltiger
Beiträge: 2
Registriert: Do 14. Aug 2025, 15:39

Re: Bereich drucken per Makro

Beitrag von wolltiger » Sa 16. Aug 2025, 19:55

Danke, mir ist die Zeile "dispatcher ..." verloren gegangern


An alle, die das LibreOffice-Forum gern nutzen und unterstützen wollen:


Bitte helfen Sie uns mit 7 Euro pro Monat.
Durch Ihren Beitrag tragen Sie dazu bei, unsere laufenden Kosten für die kommenden Monate zu decken.
Unkompliziert per Kreditkarte oder PayPal.
Als ein kleines Dankeschön werden Sie im LO-Forum als SUPPORTER gekennzeichnet.



Antworten