11-05-2012, 06:45 AM
Собственно пишу курсовик на VBA (да, и такой есть изврат). :redlol: Теперь вопрос: необходимо обратиться к элементу по его имени, что-то вроде:
cboCombobox.clear. Таких Combobox несколько, действия однотипные, соответственно получается простынка. В делфи это решалось через findcomponent. Гуглил - ничего путного не нашлось.
Плохо гуглил. Нужно было составить грамотный запрос
[SRC="php"]Sub Choise(ByRef mass, i As String)
For Each cbo In frmEdit.Controls
If cbo.Name = i Then
If UBound(mass()) = 1 Then
cbo.Clear
cbo.Text = mass(1)
Else
cbo.List = mass()
cbo.RemoveItem 0
End If
End If
Next cbo
End Sub[/SRC]
cboCombobox.clear. Таких Combobox несколько, действия однотипные, соответственно получается простынка. В делфи это решалось через findcomponent. Гуглил - ничего путного не нашлось.
Плохо гуглил. Нужно было составить грамотный запрос
[SRC="php"]Sub Choise(ByRef mass, i As String)
For Each cbo In frmEdit.Controls
If cbo.Name = i Then
If UBound(mass()) = 1 Then
cbo.Clear
cbo.Text = mass(1)
Else
cbo.List = mass()
cbo.RemoveItem 0
End If
End If
Next cbo
End Sub[/SRC]