Difference between revisions of "RU/kb/00000172"
From Wiki
Jump to navigationJump to search (Основной текст) |
(BreadCrumbL10n) |
||
| Line 1: | Line 1: | ||
<section begin=title /><noinclude>{{DISPLAYTITLE:База Знаний: </noinclude>{{OOoC|1}}. Получение доступа к элементу управления на листе<noinclude>}}</noinclude><section end=title /> | <section begin=title /><noinclude>{{DISPLAYTITLE:База Знаний: </noinclude>{{OOoC|1}}. Получение доступа к элементу управления на листе<noinclude>}}</noinclude><section end=title /> | ||
| − | {{ | + | {{BreadCrumbL10n|RU/kb/module/calc/automation_calculations}} |
__NOTOC__ | __NOTOC__ | ||
Revision as of 22:34, 2 October 2010
При создании любого элемента управления на листе OpenOffice.org Calc автоматически создаётся «форма», которой присваивается имя Standard.
Для доступа из макроса к элементу управления на форме можно использовать следующий код:
Sub EnumerateControlsInForm
Dim oForm, oControl, iNumControls%, i%
'По умолчанию это — место, где находятся элементы управления
oForm = ThisComponent.DrawPages(0).Forms.getByName("Standard")
oControl = oForm.getByName("MyPushButton")
MsgBox "Использовано getByName для получения элементов управления с именем " & oControl.Name
iNumControls = oForm.Count()
For i = 0 To iNumControls -1
MsgBox "Control " & i & " is named " & oControl.Name
Next
End Sub
