Base Dialog Opening and Function

I am attempting to create a “quick filter” popup to display macro buttons to apply filters to a form automatically. I thought of using another form that would be activated by a button press, but would like to use something more simple. I have the dialog made and looking the way I want it to test it out, but am having a problem with actually getting the dialog window to display. I searched for it and understand that the dialog boxes need to be brought up by a macro. I have this copy-paste code set on a button on the main form:

Sub DiagWorkPls
Dim Dlg As Object
DialogLibraries.LoadLibrary("Standard")
Dlg = CreateUnoDialog(DialogLibraries.Standard.Test1)
Dlg.Execute()
Dlg.dispose()
End Sub

This, of course, did not work properly for me, which brings me here. The dialog is held inside the .odb catalog so that may be a cause of the problem, but I don’t know what else could be the problem.

First post on here and very noob Base so I apologize if I didn’t look hard enough and it has already been answered before. Thanks in advance!!

Hello,

Not certain where your problem may be. Have sample with basically same code that works OK (one form; button on form) :
Dialog Post.odb (14.6 KB)

Are you set to execute macros for that file? Not restricted? My sample work?

Hm… May be on to something. Seems now like a permissions issue. I have macro security set to high and have my trusted file locations there and yours does not work. Set it to low and yours still does not work. Is there any other security menus or settings I should be aware of to try?

I have mine set to High. I use Trusted File Locations as you note. After setting, to take effect, ALL open items of LO should be closed & then re-try.

Also you have not mentioned your specific LO version or OS.

I am using:

Version: 7.2.4.1 / LibreOffice Community
Build ID: 27d75539669ac387bb498e35313b970b7fe9c4f9
CPU threads: 8; OS: Linux 5.4; UI render: default; VCL: x11
Locale: en-US (en_US.UTF-8); UI: en-US
Calc: threaded