En esta publicación, nos complace presentarles 3 maneras rápidas de seleccionar la página actual en su documento de Word.
De vez en cuando, probablemente necesites seleccionar la página actual para copiar o extraer su contenido. Normalmente, colocaríamos el cursor al principio de la página y mantendríamos pulsado el botón izquierdo del ratón para seleccionarla por completo. Sin embargo, este método no siempre funciona bien, ya que pueden producirse errores. Aunque no es una tarea complicada, puedes ahorrar tiempo utilizando métodos más rápidos.
Aquí están nuestras 3 soluciones.
Método 1: métodos abreviados de teclado para documentos de una página
Cuando solo hay una página en el documento, lo que debe hacer es colocar el puntero de inserción en cualquier lugar dentro del documento y presionar "Ctrl + A".
Método 2: métodos abreviados de teclado para documentos de varias páginas
Ahora, hablando de documentos en varias páginas, puede seguir los siguientes pasos:
- En primer lugar, coloque el puntero de inserción al principio de la página de destino.
- Luego presione "Shift".
- Luego, desplácese hacia abajo hasta la parte inferior de esa página y haga clic en al final de la página.
Método 3: ejecutar macro de Word
- En primer lugar, haga clic en la página de destino.
- Luego haga clic en la pestaña "Desarrollador".
- A continuación, haga clic en "Visual Basic" para abrir el editor de VBA. O presione "Alt + F11" para hacerlo.
- Ahora haga clic en el proyecto "Normal" y luego en la pestaña "Insertar".
- Seleccione "Módulo" en el menú desplegable.
- A continuación, haga doble clic en el módulo recién insertado para abrir el espacio de codificación.
- Pegue los siguientes códigos allí:
Sub SelectCurrentPage()
Dim lCurrentPageStart As Long
Dim lCurrentPageEnd As Long
Dim objPageRange As Range
Dim nCurrentPageNumber As Integer
Dim nAllPageNumber As Integer
nCurrentPageNumber = Selection.Information(wdActiveEndPageNumber)
nAllPageNumber = Selection.Information(wdNumberOfPagesInDocument)
' Get the start position of current page.
lCurrentPageStart = Selection.GoTo(What:=wdGoToPage, Which:=wdGoToNext, Name:=nCurrentPageNumber).Start
' Get the end position of current page.
If nCurrentPageNumber = nAllPageNumber Then
lCurrentPageEnd = ActiveDocument.Content.End
Else
lCurrentPageEnd = Selection.GoTo(What:=wdGoToPage, Which:=wdGoToNext, Name:=nCurrentPageNumber + 1).Start
End If
' Select current page.
Set objPageRange = ActiveDocument.Range(Start:=lCurrentPageStart, End:=lCurrentPageEnd)
objPageRange.Select
End Sub
- Finalmente, haga clic en "Ejecutar" o presione "F5". Todos los textos de esa página están ahora seleccionados.
Recuperar documentos de Word
Sería una molestia encontrar sus documentos de Word corruptos, dejándolo inaccesible a su información. Seguramente nadie quiere tener un doc corrupto. Sin embargo, cuando ocurre algo inesperado, la única opción que queda es recuperar los datos con una herramienta incorporada o de terceros.
Introducción del autor:
Vera Chen es experta en recuperación de datos en DataNumen, Inc., que es el líder mundial en tecnologías de recuperación de datos, incluyendo Excel corrompido y pdf reparar productos de software. Para más información visite www.datanumen.com


