如何填写链接到单元格的复选框并转置单元格引用?

如何填写链接到单元格的复选框并转置单元格引用?

我在 Excel 工作表中添加了一个复选框,然后转到属性,它允许我将其链接到一个单元格。我想执行“向下填充”以获取一列复选框,但所有复选框都链接到它们自己的单元格。

但是当我进行填充时,所有单元格最终都会链接到第一个单元格。选中一个复选框即可选中所有单元格。

我不知道如何解决这个问题。有什么想法吗?

答案1

来自的解决方案本网站

  • 按 Alt+F11 打开 Visual Basic
  • 单击插入 → 模块(因为网站说你应该把它粘贴到一个常规模块,所以我从这里这里
  • 将以下代码粘贴到新创建模块的文本框中:

    Sub LinkCheckBoxes()
    Dim chk As CheckBox
    Dim lCol As Long
    lCol = 2 'number of columns to the right for link
    For Each chk In ActiveSheet.CheckBoxes
       With chk
          .LinkedCell = _
             .TopLeftCell.Offset(0, lCol).Address
       End With
    Next chk
    End Sub
    
  • 在 Excel 窗口中,单击视图 → 宏,选择LinkCheckBoxes,单击运行

这会将每个复选框链接到其右侧两个位置的单元格(因此2代码中存在参数)。

答案2

无需使用 VBA 进行任何编程,右键单击每个复选框并编辑其 FormControl 属性以使用不同的单元格。

相关内容