如何解决vba Word在Msgbox中显示多个标签
我想使用Messagebox显示多个标签。
-
我打开新的Word文档,然后转到Backstage / Info,然后在“属性”中键入 标题:字标 标签:红色;蓝色;绿色
-
我故意使用 分号而不是逗号,因为然后在资源管理器中,我可以在搜索框中使用Tag:Red,并找到所有带有红色标签的文档。
-
以下代码确实适用于显示标题,但在显示标签上显示错误:
Sub MsgBox_Tags()
Dim sTitle As String
Dim sTags As String
sTitle = ActiveDocument.BuiltInDocumentProperties("Title").Value
MsgBox sTitle
sTags = ActiveDocument.BuiltInDocumentProperties("Tags").Value
MsgBox sTags
End Sub
MessageBox标题有效,但随后 运行时错误“ 5”,无效的过程调用或参数
欢迎任何帮助!
解决方法
尽管在Backstage视图上显示为“标签”,但这实际上是“关键字”属性。您可以通过显示“属性”对话框来看到这一点-在Backstage视图中,单击“属性”,然后选择“高级属性”。
Sub MsgBox_Tags()
Dim sTitle As String
Dim sTags As String
sTitle = ActiveDocument.BuiltInDocumentProperties("Title").Value
MsgBox sTitle
sTags = ActiveDocument.BuiltInDocumentProperties("Keywords").Value
MsgBox sTags
End Sub
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。