BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das LibreOffice Forum zu erhalten!

❤️ DANKE >><< DANKE ❤️

> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des LibreOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet. 🤗

Macrorecorder wie benutzen?

CALC ist die Tabellenkalkulation, die Sie immer wollten.
Antworten
Wagner K
Beiträge: 1
Registriert: Mo 4. Dez 2017, 21:05

Macrorecorder wie benutzen?

Beitrag von Wagner K » Mo 4. Dez 2017, 21:17

nach nun 3 Wochen und absoluter Ratlosigkeit was ich tun soll bitte ich euch um Hilfe.
Ich habe mich versucht durch zu beißen aber nach 2 Tastaturen gebe ich mich geschlagen.

Ich versuche über den MAcrorecorder olgende Situation aufzuzeichnen:

1.einen Bereich aus einer Tabelle markieren und Copieren.
2. sprung in eine andere Tabelle
3.Den Kopierten Bereich dort einfügen
4.Eine Zeile nach unten verschieben um für die nächste Past anweisung platz zu schaffen
5.Zurück springen in die Ausgangstabelle
6. Macro über Button Akton einbinden.
Resultat:
Entweder nur leere Zeilen werden nach unten verschoben oder
die Tabelle wird komplett zerschossen mit der erstn Spalte.

So sieht die Anweisung bis jetzt aus:
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(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "ToPoint"
args1(0).Value = "$F$16:$K$16"

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

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:Copy", "", 0, Array())

rem ----------------------------------------------------------------------
dim args3(0) as new com.sun.star.beans.PropertyValue
args3(0).Name = "Nr"
args3(0).Value = 17

dispatcher.executeDispatch(document, ".uno:JumpToTable", "", 0, args3())

rem ----------------------------------------------------------------------
dim args4(0) as new com.sun.star.beans.PropertyValue
args4(0).Name = "ToPoint"
args4(0).Value = "$B$3:$G$3"

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

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:Paste", "", 0, Array())

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertRowsBefore", "", 0, Array())

rem ----------------------------------------------------------------------
dim args7(0) as new com.sun.star.beans.PropertyValue
args7(0).Name = "Nr"
args7(0).Value = 1

dispatcher.executeDispatch(document, ".uno:JumpToTable", "", 0, args7())

rem ----------------------------------------------------------------------
dim args8(0) as new com.sun.star.beans.PropertyValue
args8(0).Name = "ToPoint"
args8(0).Value = "$F$16"

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


end sub

________________________
Vielen Dank schon mal hoffe irgend jemand auf diesem Planeten hat einen Plan

Helmut_S
Beiträge: 692
Registriert: Di 9. Feb 2016, 19:27

Re: Macrorecorder wie benutzen?

Beitrag von Helmut_S » Mo 4. Dez 2017, 21:34

Hallo, bitte lies die online-Hilfe bezgl. Makroaufzeichnung, ich fürchte das geht nicht so wie du es möchtest.
https://help.libreoffice.org/Common/Rec ... a_Macro/de
Vor allem was die Beschränkung der Makroaufzeichnung betrifft.
Gruß Helmut
MX-Linux KDE + Linux-Mint Cinnamon

An alle, die das LibreOffice-Forum nutzen:


Bitte beteiligen Sie sich mit 7 Euro pro Monat und helfen uns bei unserem Budget für das Jahr 2024.
Einfach per Kreditkarte oder PayPal.
Als Dankeschön werden Sie im Forum als LO-SUPPORTER gekennzeichnet.

❤️ Vielen lieben Dank für Ihre Unterstützung ❤️

Antworten