Question

我对Word VBA比较陌生。

我正在对Userform一词应用一个复选框。单击复选框后，我需要删除名为“ Positioning”的书签。然后，用户窗体将使用CommandButton生成文档。只需查找要在命令按钮脚本中运行的代码，即可在单击复选框时删除书签。

Answer 1

由于您是新的贡献者，因此我将不遗余力，即使问题不是很具体，也可以猜测一下您想要什么...

在UserForm设计器中双击一个复选框时，默认情况下它将为您提供Click事件。这就是代码需要去的地方。

使用带有书签名称的Bookmarks集合在文档中定位书签非常简单，如以下代码段所示。真正的问题是：您是说只删除书签，还是删除书签及其内容。两种版本都在代码示例中。

示例代码还显示了如何测试复选框的值以及如何根据是否选中复选框来执行操作。

Private Sub CheckBox2_Click()
    Dim ck As MSForms.CheckBox

    Set ck = Me.CheckBox2
    If ck.value = True Then
        'To delete just the bookmark
        'ActiveDocument.Bookmarks("Positioning").Delete

        'To delete bookmark and its content
        ActiveDocument.Bookmarks("Positioning").Range.Delete
    End If
End Sub

卡住-删除Word用户窗体上带有复选框的书签

1 个答案: