excel - 复选框旁边的单元格的位置

Question

我想将复选框旁边的单元格的值添加到总和中，如下所示：

首先，我尝试返回复选框旁边的单元格的值，但我发现在我的复选框旁边写下这个单元格的位置很困难。

我使用了“left”和“top”，如下所示：

Sub Caseàcocher_Cliquer()

    Dim ligne As Integer
    Dim colonne As Integer

    ligne = 4
    colonne = 3 

    If [Case à cocher 1].Value = 1 Then

    ThisWorkbook.Worksheets(1).Cells(ligne, colonne).Value = ThisWorkbook.Worksheets(1).Cells(ligne, colonne).Value + ThisWorkbook.Worksheets(1).Cells([Case à cocher 1].Left, [Case à cocher 1].Top + 2).Value

    Else: [ThisWorkbook.Worksheets(1).Cells(ligne, colonne).Value] = [ThisWorkbook.Worksheets(1).Cells(ligne, colonne).Value]

我昨天开始使用 VBA，但我没有找到正确的写法。

这部分是错误的，但我不知道为什么以及如何替换它：

'ThisWorkbook.Worksheets(1).Cells([Case à cocher 1].Left, [Case à cocher 1].Top + 2).Value'

标签： excel