Apertura de formulario desde macro activando propiedad solo

Desarrollo de Macros y programación en UNO, usar las API, llamar programas externos...
Responder
juribe
Mensajes: 1
Registrado: Lun Oct 26, 2020 5:29 pm

Apertura de formulario desde macro activando propiedad solo

Mensaje por juribe »

Actualmente utilizo para abrir un formulario codigo tal que este:

onewformdocument=thisdatabasedocument.formdocuments.getbyname("Usuarios").open
o en el caso de querer cerrarlo...
onewformdocument=thisdatabasedocument.formdocuments.getbyname("Usuarios").close

Mi pregunta es como realizar una orden de apertura de un formulario que además de abrirlo, lo haga en uno de los modos siguientes:
permitir adiciones
permitir modificaciones
permitir eliminaciones
Solo añadir datos

del mismo modo que podria hacerlo si previamente a mandar que se abra lo hubiera fguerdado con esas propiedades activadas/desactivadas

Gracias anticipadas.
Libreoffice 6.3.6.2 en Windows 10 (64)
markotxe
Mensajes: 27
Registrado: Jue May 02, 2019 9:47 am

Re: Apertura de formulario desde macro activando propiedad s

Mensaje por markotxe »

Hola Juribe,
No estoy muy seguro de entender muy bien...
Mas que a un formulario, creo que te refieres a una caja de dialogo, no?
Si es el caso, entonces debes hacer que tu dialogo sea "no modal".
Se podrá entonces trabajar en la hoja de calculo teniéndolo abierto.

El código mágico es:

Código: Seleccionar todo

Sub LlamaDialogo
	Dim dDialog As Object	
	DialogLibraries.LoadLibrary("Standard")
	oDialog     = DialogLibraries.Standard.Dialog1
	oPDialog   = CreateUnoDialog(oDialog)
	Modal       = False
 If Modal Then
    iDialogResult =  oPDialog.Execute()
Else
      oPDialog.visible = true
   do
      wait (100)
   loop
End If 
End Sub


Espero que te sirva de algo...

Buenas noches
Marc
OpenOffice 4.1.5 CALC, Window10
Longi
Mensajes: 804
Registrado: Dom Ene 20, 2013 9:05 pm
Ubicación: Ourense, Galicia, España

Re: Apertura de formulario desde macro activando propiedad s

Mensaje por Longi »

Buenas!
Echa un vistazo a este hilo:
https://forum.openoffice.org/es/forum/v ... ormulario/
Un saludo! ;)
Openoffice 4.1.7, en Windows 10
Libreoffice 6.4.2, en Windows 10
Responder