Seite 1 von 1

[Gelöst] Calc: Listenfeld aufklappen

Verfasst: Fr, 07.04.2017 12:04
von retuwe61
Hallo miteinander.
In einer Calc-Tabelle befinden sich mehrere Textfelder und ein aufklappbares Listenfeld.
Mittels TAB-Taste wechsele ich dorthin und möchte, dass es dabei sofort aufgeklappt wird.
Hat jemand eine Idee oder sogar eine Makro-Lösung dafür, die ich dem Fokuserhalt des Listenfeldes zuweisen kann?
Trotz intensiver Suche konnte ich im Forum dazu nichts finden.
Gruß
Uwe

Re: Calc: Listenfeld aufklappen

Verfasst: Fr, 07.04.2017 16:50
von F3K Total
Hi,
das geht, binde dieses Makro an das Ereignis "bei Fokuserhalt", und die Listbox klappt auf, selektiert ist der 10 Eintrag.

Code: Alles auswählen

Sub S_dropdown_Listbox(event)
    oController = ThisComponent.CurrentController
    oListbox = event.source.model
    oListboxCTRL = oController.getcontrol(oListbox)
    oAccessibleContext = oListboxCTRL.getAccessibleContext
    oAccessibleContext.doAccessibleAction(0)'Aufklappen
    oListboxCTRL.selectItem(10,true)
End Sub
Gruß R

Re: Calc: Listenfeld aufklappen

Verfasst: Sa, 08.04.2017 00:32
von retuwe61
Sehr gut. Vielen Dank.
Gruß
Uwe