Ask Your Question

Revision history [back]

click to hide/show revision 1
initial version
Sub test_findbar
dim document as object
dim dispatcher as object

dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dispatcher.executeDispatch(document, "vnd.sun.star.findbar:FocusToFindbar", "", 0, Array())
End Sub