0
我正在使用OpenOffice Calc。 我在OpenOffice BASIC中寫宏。 我需要正確的代碼在工作表中插入一個複選框。OpenOffice BASIC如何在工作表中插入複選框
我現在有
Dim Doc as Object
Doc = ThisComponent
Dim cbName As Object
cbName = "checkbox_name"
Dim oCheckBoxModel as Object
// dlg is a dialog, (don't know how to create a checkbox else)
oCheckBoxModel = dlg.getmodel().createInstance("com.sun.star.awt.UnoControlCheckBoxModel")
oCheckBoxModel.PositionX = 100
oCheckBoxModel.PositionY = 100
oCheckBoxModel.Width = 50
oCheckBoxModel.Height = 30
oCheckBoxModel.Label = id
oCheckBoxModel.Name = cbName
oCheckBoxModel.Enabled = True
oCheckBoxModel.TabIndex = 1
Doc.Sheets().insertByName(cbName, oCheckBoxModel) // This line is totally wrong, but I hope it's clear what I want to do
所以我想創建一個複選框,然後將其插入到表。 (在特定的單元格中,或者只是通過設置X和Y位置)。 我在網上搜索過,但我只能找到有關將控件插入對話框的信息,而不是表格