База Знаний: Calc. Получение доступа к элементу управления на листе

From Wiki
Revision as of 17:42, 18 May 2011 by Admin (talk | contribs) (1 версия)
Jump to navigationJump to search


При создании любого элемента управления на листе 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



Template:RUsignyear







К началу страницы