GELÖST Extension DATA FORM per Makro anzeigen

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

achimgr
***
Beiträge: 68
Registriert: Mi, 30.04.2008 16:14

GELÖST Extension DATA FORM per Makro anzeigen

Beitrag von achimgr »

Hallo,
ich habe die Extension Data Form installiert.
Dann habe ich folgendes per Makrorecorder aufgezeichnet
(Curser ist in Tabellenblatt 4):
--------------------
Wechsel zu TB 6
Zelle in der Tabelle markieren (A5)
(Menüleiste) Daten - Form... anklicken (Formular wird angezeigt)
Formular schliessen (da denke ich, es wird bei der Makroausführung geschlossen wenn ich nach der Dateneinagbe auf "schliessen" klicke)
Wechsel zu TB 4
Zelle D50 markieren.
-------------------

Problem: Es wird nur der Wechsel zu TB 6 / A5 und zurück zu TB 4 / D50 aufgezeichnet.
Das Anzeigen des Formulares ist nicht im Code enthalten.

Wie löse ich das?

Vielen Dank.
Zuletzt geändert von achimgr am Do, 10.07.2014 09:00, insgesamt 1-mal geändert.

Grüße aus Niedersachsen,
Achimgr
Karolus
********
Beiträge: 7535
Registriert: Mo, 02.01.2006 19:48

Re: Extension DATA FORM per Makro anzeigen

Beitrag von Karolus »

Hallo

Die Extension ist in Basic geschrieben, und du kannst die entspechende Routine mit Argument aufrufen.

Code: Alles auswählen

Sub Main
doc = thisComponent
sheet = doc.Sheets(1)
range = sheet.getCellRangeByName("A1:C2")
coboDataForm( range )
End Sub


Karolus
LO7.4.7.2 debian 12(bookworm) auf Raspberry5 8GB (ARM64)
LO25.2.3.2 flatpak debian 12(bookworm) auf Raspberry5 8GB (ARM64)
Stephan
********
Beiträge: 12368
Registriert: Mi, 30.06.2004 19:36
Wohnort: nahe Berlin

Re: Extension DATA FORM per Makro anzeigen

Beitrag von Stephan »

Problem: Es wird nur der Wechsel zu TB 6 / A5 und zurück zu TB 4 / D50 aufgezeichnet.
Stimmt, denn der Makrorekorder zeichnet nur sog. Dispatchbefehle auf, also nur die die z.B. hier aufgelistet sind:

https://wiki.openoffice.org/wiki/Framew ... x_Commands
Wie löse ich das?
indem Du den Aufruf des Formulars händisch zum Code hinzufügst:

Code: Alles auswählen

GlobalScope.BasicLibraries.LoadLibrary("DataForm")
GlobalScope.DialogLibraries.LoadLibrary("DataForm")
DataForm.DataForm.coboDataForm()

Gruß
Stephan
achimgr
***
Beiträge: 68
Registriert: Mi, 30.04.2008 16:14

Re: GELÖST Extension DATA FORM per Makro anzeigen

Beitrag von achimgr »

Vielen Dank an Karolus und Stephan.

Grüße aus Niedersachsen,
Achimgr
Antworten