Excel如何自动为复选框关联单元格批量设置删除线条件格式？

方法一：VBA批量设置（和你关联复选框的逻辑一致） #

直接用VBA遍历所有复选框，给对应右侧单元格自动加上条件格式，代码如下：

Sub AddConditionalFormatting()
    Dim cbox As CheckBox
    Dim linkedCell As Range
    Dim targetCell As Range
    
    For Each cbox In ActiveSheet.CheckBoxes
        Set linkedCell = ActiveSheet.Range(cbox.LinkedCell)
        ' 定位到关联单元格右侧的单元格
        Set targetCell = linkedCell.Offset(0, 1)
        
        ' 先清空目标单元格已有的条件格式，避免重复叠加
        targetCell.FormatConditions.Delete
        
        ' 添加条件规则：当关联单元格打勾（值为TRUE）时，显示删除线
        With targetCell.FormatConditions.Add(Type:=xlExpression, Formula1:="=" & linkedCell.Address)
            .Font.Strikethrough = True
            .StopIfTrue = False
        End With
    Next cbox
End Sub

操作步骤：

• 先运行你已经写好的AssignCell代码，确保所有复选框都关联到对应单元格
• 再运行上面这段代码，一键完成所有条件格式的设置

方法二：不用VBA，整列一键设置 #

如果不想写代码，直接给目标列设置动态条件格式就行：
假设复选框关联在B列，要加删除线的是C列：

1. 选中C列（或者你实际需要设置的目标列）
2. 点「条件格式」→「新建规则」→选「使用公式确定要设置格式的单元格」
3. 输入公式：=$B1=TRUE（注意这里B1是列首单元格，行号用相对引用，列用绝对引用）
4. 点「格式」→「字体」→勾选「删除线」，确定保存

这样不管是现有行还是新增的行，只要B列对应单元格被勾选，C列同一行就自动显示删除线，完全不用逐个设置。

内容的提问来源于stack exchange，提问作者SunnyM