Trabajar con el objeto Selection

Importante

En este artículo es máquina traducido, vea la exención de responsabilidad. Encontrará la versión en inglés de este artículo aquí para su referencia.

Cuando se trabaja en un documento de Word de Microsoft Office, normalmente se selecciona texto y, a continuación, realizar una acción, como dar formato al texto o escribir texto. En el Visual Basic de Microsoft, normalmente no es necesario seleccionar texto antes de modificar el texto. En su lugar, cree una Range objeto que hace referencia a una parte específica del documento. Para obtener información sobre cómo definir objetos Range , consulte Working with Range objects. Sin embargo, si desea que su código para responder a o cambiar una selección, puede hacerlo mediante el uso de la Selection objeto.

Si no hay texto seleccionado, utilice la Seleccione método para seleccionar el texto que está asociado con un objeto específico y crea un objeto Selection . Por ejemplo, la siguiente instrucción selecciona la primera palabra del documento activo.

Sub SelectFirstWord()
    ActiveDocument.Words(1).Select
End Sub

Para obtener más información, consulte Selecting text in a document.

Si hay texto seleccionado, utilice la propiedad Selection para devolver un objeto Selection que represente la selección actual en un documento. Sólo puede haber un objeto Selection en cada documento, y éste siempre obtiene acceso a la selección actual. En el siguiente ejemplo, se cambia el formato de los párrafos de la selección actual.

Sub FormatSelection()
    Selection.Paragraphs.LeftIndent = InchesToPoints(0.5)
End Sub

En este ejemplo, se inserta la palabra "Hello" después de la selección actual.

Sub InsertTextAfterSelection()
    Selection.InsertAfter Text:="Hello "
End Sub

En este ejemplo, se aplica el formato de negrita al texto seleccionado.

Sub BoldSelectedText()
    Selection.Font.Bold = True
End Sub

Con frecuencia, la grabadora de macros crea una macro que utiliza el objeto Selection. El siguiente ejemplo se ha creado utilizando la grabadora de macros. Esta macro selecciona las dos primeras palabras del documento activo y les aplica el formato de negrita.

Sub Macro()
    Selection.HomeKey Unit:=wdStory
    Selection.MoveRight Unit:=wdWord, Count:=2, Extend:=wdExtend
    Selection.Font.Bold = wdToggle
End Sub

En el siguiente ejemplo, se realiza la misma tarea sin seleccionar el texto ni utilizar el objeto Selection.

Sub WorkingWithRanges()
    ActiveDocument.Range(Start:=0, _
        End:=ActiveDocument.Words(2).End).Bold = True
End Sub

Nota

Declinación de responsabilidades de traducción automática: Este artículo se ha traducido con un sistema informático sin intervención humana. Microsoft ofrece estas traducciones automáticas para que los hablantes de otros idiomas distintos del inglés puedan disfrutar del contenido sobre los productos, los servicios y las tecnologías de Microsoft. Puesto que este artículo se ha traducido con traducción automática, es posible que contenga errores de vocabulario, sintaxis o gramática.