Word) (Document.AddToFavorites 方法

會建立文件或超連結的捷徑，並將它新增至 [我的最愛] 資料夾。

語法

運算式。AddToFavorites

需要 expression。 代表 Document 物件的變數。

範例

此範例會為使用中文件內的所有超連結建立捷徑，並將這些捷徑新增至 [我的最愛] 資料夾。

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

另請參閱

Document 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。