3 maneiras rápidas de selecionar a página atual em seu documento do Word

Neste post, temos o prazer de apresentar 3 maneiras rápidas de selecionar a página atual em seu documento do Word.

De vez em quando, você provavelmente precisará selecionar a página atual para copiar ou extrair o conteúdo. Normalmente, posicionamos o cursor no início da página e mantemos o botão esquerdo do mouse pressionado para selecionar a página inteira. Mas você tem que admitir que esse método nem sempre funciona bem, já que podem ocorrer erros. Embora não seja nenhum bicho de sete cabeças, você pode economizar tempo adotando métodos mais rápidos.

Aqui estão as nossas 3 soluções.

Método 1: Atalhos de teclado para documento de uma página

Quando houver apenas uma página no documento, o que você precisa fazer é colocar o ponteiro de inserção em qualquer lugar dentro do documento e pressionar “Ctrl+A”.

Método 2: Atalhos de teclado para documento de várias páginas

Agora falando em documento multi-page, você pode seguir os seguintes passos:

1. Primeiramente, posicione o ponteiro de inserção no início da página de destino.
2. Em seguida, pressione “Shift”.
3. Em seguida, role para baixo até a parte inferior da página e clique no final da página.

Método 3: Executar Macro do Word

1. Em primeiro lugar, clique na página desejada.
2. Em seguida, clique na guia "Desenvolvedor".
3. Em seguida, clique em “Visual Basic” para abrir o editor VBA. Ou pressione “Alt+F11” para fazer isso.
4. Agora clique no projeto “Normal” e depois na guia “Inserir”.
5. Selecione "Módulo" no menu suspenso.
6. Em seguida, clique duas vezes no módulo recém-inserido para abrir o espaço de codificação.
7. Cole os seguintes códigos lá:

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

8. Por fim, clique em “Executar” ou pressione “F5”. Todos os textos dessa página estão agora em seleção.

Recuperar Documentos do Word

Seria muito doloroso encontrar seus documentos do Word corrompidos, deixando você inacessível às suas informações. Com certeza, ninguém quer ter um documento corrompido. No entanto, quando o inesperado acontece, a única opção que resta é recuperar os dados com uma ferramenta interna ou de terceiros.

Introdução do autor:

Vera Chen é especialista em recuperação de dados em DataNumen, Inc., líder mundial em tecnologias de recuperação de dados, incluindo Excel corrompido e pdf reparar produtos de software. Para mais informações visite www.datanumen.com