如何使用复选框更改公式

Question

我正在尝试切换公式中包含的数据。如果选中此框，我想在公式中包含一系列单元格。如果未选中该框，我不希望在公式中包含数据。我试图使用VBA来做到这一点，但我不确定从哪里开始。在此先感谢您的帮助！

Answer 1

您可以在复选框的更改事件中替换单元格/范围的公式。根据以下代码中的逻辑替换单元格和公式值。

Private Sub CheckBox1_Change()

  If CheckBox1.Value Then
    'Checked
    Worksheets("Sheet1").Range("A1").Formula = "=$B$4+$B$10"
  Else
    'Unchecked
    Worksheets("Sheet1").Range("A1").Formula = "=$C$4+$C$10"
  End If

End Sub