如何利用复选框实现word文字增加删除

各位，
我现在在用word编辑一个文件，需要在文件中通过选中复选框来实现在文件特定位置增加或删除文字的功能。
请告诉我编程语句应如何写？
万分感谢！！

希望能有高手指点下！
我写的代码如下
Private Sub CheckBox1_Click()
TextBox.Visible = False
If checkbox1.Value = 0 Then
TextBox1.Visible = False

End If
End Sub

运行时显示运行错误424，要求对象，请帮助看下是什么问题?