在WORD中,如何实现选中一个CheckBox控件后,这个控件所在行的表格可以改变背景色

时间:2022-01-10 19:17:28
一直使用WORD写周工作计划,是一个有五列内容的表格,我想在加一列,然后在表格中插入一个CheckBox控件,以实现选中这个控制后,这一行的单元格可以改变背景色。不知道如何实现!

2 个解决方案

#1


自己先顶一下。

#2


这样行不行(Item后面的1是第几张表格,Rows后面的是第几行)
Private Sub CheckBox1_Click()
    If CheckBox11.Value = False Then
        Tables.Item(1).Rows(1).Shading.BackgroundPatternColor = wdColorRed
    Else
        Tables.Item(1).Rows(1).Shading.BackgroundPatternColor = wdColorBlue
    End If
End Sub

#1


自己先顶一下。

#2


这样行不行(Item后面的1是第几张表格,Rows后面的是第几行)
Private Sub CheckBox1_Click()
    If CheckBox11.Value = False Then
        Tables.Item(1).Rows(1).Shading.BackgroundPatternColor = wdColorRed
    Else
        Tables.Item(1).Rows(1).Shading.BackgroundPatternColor = wdColorBlue
    End If
End Sub