[RESUELTO]Calendario desplegable

[Longi]

Buenas!

Estoy intentando que al recibir el foco en un control de fecha con la propiedad dropdown activa se despliegue el calendario.
En combo box en list box me sale bien con :

Código: Seleccionar todo

   		oTableControl.setFocus                                                                  ' Ponemos el foco en el control de tabla
   		oTableControl.setCurrentColumnPosition(1)                                               ' Pone el foco en la columna Referencia
   		set oWSObj1 = CreateObject("WScript.Shell")                                             ' Creamos el objeto
   		oWSObj1.SendKeys ("%{down}")                                                            ' Como que aplicamos una combinación de teclas Alt+Down

Pero con el calendario no hay manera.
Si alguien sabe.....se agradecería.

Un saludo!

[Longi]

Buenas!

En LibreOffice 7.5.1.2, Windows 10, y al menos fuera de control de tablas despliega sin problemas con este código, así que lo doy por resuelto.
oDoc = ThisComponent ' El documento
oDocView = oDoc.getCurrentController() ' El controlador
oCtrl=oForm.getByName("FECHA DE AUTOS") ' control de Fecha
oDocView.getControl(oCtrl).setFocus() ' Nos fijamos en el control
set oWSObj1 = CreateObject("WScript.Shell") ' Creamos el objeto
oWSObj1.SendKeys ("%{down}") ' Como que aplicamos una combinación de teclas Alt+Down



Un saludo!