Тема: VBA :redlol:
Показать сообщение отдельно
Непрочитано 05.11.2012, 06:45   #1
Аватар для Zubastic
ZG troll squad

Автор темы (Топик Стартер) VBA :redlol:

Собственно пишу курсовик на VBA (да, и такой есть изврат). Теперь вопрос: необходимо обратиться к элементу по его имени, что-то вроде:
cboCombobox.clear. Таких Combobox несколько, действия однотипные, соответственно получается простынка. В делфи это решалось через findcomponent. Гуглил - ничего путного не нашлось.

Плохо гуглил. Нужно было составить грамотный запрос
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
Code: PHP
Zubastic вне форума Ответить с цитированием