Блог

Я работаю в Excel 2010. Возникла проблема с сбоем элемента управления Checkbox (элемент управления ActiveX), когда я использую другое имя элемента управления Checkbox, чем обычно назначенное. Попытка закодировать действия на основе проверено или не проверено.

Требует ли протокол именования для флажков использования соглашения «Checkbox #», чтобы поддерживать его поиск при кодировании. Пожалуйста, не смейтесь, я не очень техничен, поэтому то, что большинству кажется очевидным, для меня является основным слепым пятном. Спасибо за вашу помощь. Я не в восторге от наличия флажков с 1 по 100, когда более удобное для пользователя имя помогло бы моему слабому мозгу.

Вот пример точного кода под двумя разными именами элементов управления. «Checkbox1» работает, а «CheckboxX» — нет.

 Private Sub CheckBox1_Click()

If Checkbox1.Value = True Then

    Range("P9").Select
    Selection.Copy
    Range("O9").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Range("O9").Select
    Application.CutCopyMode = False
    Range("O9").Select

Else

    Range("O9").Select
    ActiveCell.FormulaR1C1 = ""
    Range("O9").Select

End If

End Sub
  

 Private Sub CheckboxX_Click()

If Checkbox1.Value = True Then
    Range("P9").Select
    Selection.Copy
    Range("O9").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Range("O9").Select
    Application.CutCopyMode = False
    Range("O9").Select

Else

    Range("O9").Select
    ActiveCell.FormulaR1C1 = ""
    Range("O9").Select

End If

End Sub