Я пытаюсь сделать лист оценки более эффективным для наших андеррайтеров.В настоящее время они должны вручную выбрать все формы для цитаты.Многие из этих форм требуются на основе различных материалов в других местах рабочей книги.Например, для каждого штата требуется форма, специфичная для данного штата.
Таким образом, исходя из введенного состояния, я бы хотел выбрать правильную форму с помощью флажка ActiveX.Я могу сделать это, кодируя каждую отдельную коробку, но мне интересно, смогу ли я сделать это массово.Я попробовал следующее несколькими способами, но продолжаю получать ошибки.
Private Sub ChangeBoxes()
Dim RiskState As Range
Dim cb As CheckBox
Dim cbRng As Range
Dim StateTrig As Range
Set RiskState = Sheets("Account Review").Range("G16")
Set cbRng = Sheets("ECC Forms Table").Range("C14:C18")
Set RateTrig = Sheets("ECC Forms Table").Range("I14:I18")
If RiskState.Value = RateTrig.Value Then
For Each cb In cbRng.CheckBoxes
cb.Value = True
Next cb
End If
End Sub