从Macro in Base获取一个按钮(Libreoffice)

时间:2017-10-04 09:21:15

标签: libreoffice basic libreoffice-basic libreoffice-base

我正在尝试创建一个简单的宏来控制放在表单中的两个按钮。它们是交替的位置,因此它们可以被按下或按下,目标是只按下其中一个。我的想法是每次按下两个中的一个时执行一个宏,宏将负责打压另一个宏。

有什么想法吗?

非常感谢!

1 个答案:

答案 0 :(得分:0)

以下代码来自https://forum.openoffice.org/en/forum/viewtopic.php?f=20&t=34337。它适用于Base表格和Calc。

Sub subButtonDisableButton2(Event As Object)
   Dim oForm As Object
   Dim oModelButton As Object
   'We get the model of the form from the button who calls the macro
   oForm=Event.Source.Model.Parent
   'Now we get the model of button2
   oModelButton=oForm.GetByName("button2")
   'And we disable it!
   oModelButton.Enabled=False
End Sub

或使用单选按钮,通常表示一次只能选择一个。