返回介绍

AddToFavorites 方法

发布于 2019-09-29 09:53:47 字数 693 浏览 5363 评论 0 收藏 0

创建文档或超链接的快捷方式,并将其添加到“收藏夹”。

expression.AddToFavorites

expression 必需。该表达式返回一个 Document 或 Hyperlink 对象。

示例

本示例为活动文档的所有超链接创建快捷方式,并将其添加到“收藏夹”文件夹。

For Each myHyperlink In ActiveDocument.Hyperlinks
 myHyperlink.AddToFavorites
Next myHyperlink

本示例为 Sales.doc 创建快捷方式,并将其添加至“收藏夹”文件夹。如果 Sales.doc 还未打开,本示例将从 C:\Documents 文件夹打开该文档。

For Each doc in Documents
 If LCase(doc.Name) = "sales.doc" Then isOpen = True
Next doc
If isOpen <> True Then Documents.Open _
 FileName:="C:\Documents\Sales.doc"
Documents("Sales.doc").AddToFavorites

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
    我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
    原文