Método Document.AddToFavorites (Word)

Crea un acceso directo al documento o un hipervínculo y lo agrega a la carpeta Favoritos.

Sintaxis

expresión. AddToFavorites

expresión requerida. Variable que representa un objeto Document.

Ejemplo:

En este ejemplo se crea un acceso directo para cada hipervínculo del documento activo y se agrega a la carpeta Favoritos.

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

En este ejemplo se crea un acceso directo a Sales.doc y se agrega a la carpeta Favoritos. Si Sales.doc no está abierto actualmente, se abre desde la carpeta 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

Consulte también

Objeto Document

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.