VBA - Включение переменной в именование кнопки опции Activex - PullRequest
0 голосов
/ 18 марта 2019

У меня есть лист заказа, который включает в себя комбинацию флажков, а также кнопки выбора.

  • Есть 10 рядов из 3 кнопок выбора и 1 флажок.Каждая строка сгруппирована.
  • Флажки работают нормально, и я могу ссылаться на них, используя переменную i, которая относится к номеру строки.
    • Я пытался сделать то же самое для кнопок параметров.Т.е. я пытаюсь ссылаться на кнопки выбора, используя переменную i.Тем не менее, я не смог найти решение.

Этот код я использую для ссылки на флажки с использованием переменной i.Это отлично работает.

    If Sheets("Order Sheet").Shapes("Check Box " & i).ControlFormat.Value = 1 Then

Я использовал аналогичную логику, чтобы попытаться сослаться на кнопки выбора.Однако все варианты моего метода проб и ошибок, основанные на смутно похожих вещах, которые я нашел в Интернете, потерпели неудачу.

If OLEObjects("OptionButton" & i + 30).Object.Value = True Then

Текущая ошибка с приведенным выше фрагментом кода: «Sub или функция не определена».Выделение строки кода OLEObjects.

Любая помощь или указание о том, куда идти с включением переменной в наименование кнопок выбора, будет принята с благодарностью.

1 Ответ

2 голосов
/ 18 марта 2019

Вам необходимо указать, на каком листе ваша OLEObjects:

ThisWorkbook.Worksheets("Sheet1").OLEObjects  

См. Также документацию: Объект OLEObjects .

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...