Compartir a través de


Método Range.WholeStory (Word)

Expande un intervalo para que incluya el artículo completo.

Sintaxis

expresión. WholeStory

expresión obligatoria. Variable que representa un objeto Range.

Comentarios

Las instrucciones siguientes, donde myRange es un objeto Range válido, son equivalentes funcionalmente:

myRange.WholeStory 
myRange.Expand Unit:=wdStory

Ejemplo:

En este ejemplo, se expande myRange para que incluya el artículo completo y, a continuación, se aplica la fuente Arial al intervalo.

Set myRange = Selection.Range 
myRange.WholeStory 
myRange.Font.Name = "Arial"

En este ejemplo, se expande myRange para que incluya el artículo de los comentarios completo (wdCommentsStory) y, a continuación, se copian los comentarios en un nuevo documento.

If ActiveDocument.Comments.Count >= 1 Then 
 Set myRange = Activedocument.Comments(1).Range 
 myRange.WholeStory 
 myRange.Copy 
 Documents.Add.Content.Paste 
End If

Vea también

Objeto Range

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.