书签能否设条件？

thumbring

在WORD中，我设置了一个书签a，

我现在想根据不同的条件显示不同的内容。
举例：如果a=“浙江”，word中插入a书签的地方显示“浙”；如果a=“上海”，word中显示“沪”。

能实现上述过程吗？如果可以的话，请问用什么语句？

konggs

你好。参考如下：

Option Explicit

Sub ChangeBookmark()
    '定义书签
    Dim tempbkmk As Bookmark
    For Each tempbkmk In ActiveDocument.Bookmarks '在书签内循环
        Select Case tempbkmk.Range.Text '判断书签的内容
            Case "浙江"
                tempbkmk.Range.Text = "浙"
            Case "上海"
                tempbkmk.Range.Text = "沪"
                '根据情况情况，再加很多case
        End Select
       
    Next
   
End Sub

守柔

QUOTE:

以下是引用thumbring在2007-6-7 12:58:26的发言：

在WORD中，我设置了一个书签a，

我现在想根据不同的条件显示不同的内容。
举例：如果a=“浙江”，word中插入a书签的地方显示“浙”；如果a=“上海”，word中显示“沪”。

能实现上述过程吗？如果可以的话，请问用什么语句？

孔版主用的是VBA，我再来添一个域。

注意,"{}"是由Ctrl+F9组合键自动插入的域标志!

域代码:{ ASK myBK "请输入省份全称" }

{ if myBK = "江苏" "江" { if myBK = "上海" "沪" { if myBK = "浙江" "淅" "暂时不告诉你!" } } }

请选中这些域代码后再按下F9键。