3 hurtige måder at vælge den aktuelle side i dit Word-dokument

I dette indlæg er vi glade for at præsentere dig for 3 hurtige måder at vælge den aktuelle side i dit Word-dokument.

Nu og da vil du sikkert få brug for at vælge den aktuelle side for at kopiere eller udtrække indholdet. Normalt ville vi placere markøren i starten af ​​siden og holde venstreklik nede for at vælge hele siden. Men du må indrømme, at denne metode ikke fungerer altid godt, da der kan opstå fejl. Selvom det ikke er raketvidenskab at gøre arbejdet, kan du spare tid ved at anvende hurtigere metoder.

Her er vores 3 løsninger.

Metode 1: Tastaturgenveje til dokument på én side

Når der kun er én side i dokumentet, er det, du skal gøre, at placere din indsættelsesmarkør hvor som helst inde i dokumentet og trykke på "Ctrl+ A".

Metode 2: Tastaturgenveje til flersidet dokument

Når vi nu taler om dokument på flere sider, kan du tage nedenstående trin:

1. Placer først indsættelsesmarkøren i begyndelsen af ​​målsiden.
2. Tryk derefter på "Shift".
3. Rul derefter ned til bunden af ​​den side og klik i slutningen af ​​siden.

Metode 3: Kør Word Macro

1. Klik først og fremmest på målsiden.
2. Klik derefter på fanen "Udvikler".
3. Klik derefter på "Visual Basic" for at åbne VBA editor. Eller tryk på "Alt+ F11" for at gøre det.
4. Klik nu på "Normal" projekt og derefter på fanen "Indsæt".
5. Vælg "Modul" i rullemenuen.
6. Dobbeltklik derefter på det nyligt indsatte modul for at åbne kodningsrummet.
7. Indsæt følgende koder der:

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. Til sidst skal du klikke på "Kør" eller trykke på "F5". Alle tekster på den side er nu i udvalg.

Gendan Word-dokumenter

Det ville være så pinefuldt at finde dine Word-dokumenter ødelagte, så du bliver utilgængelig for dine oplysninger. Sikkert, ingen ønsker at have en korrupt dok. Men når det uventede sker, er den eneste mulighed tilbage at hente dataene tilbage med enten indbygget eller et tredjepartsværktøj.

Forfatter Introduktion:

Vera Chen er en datagendannelsesekspert i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder ødelagt Excel og pdf produkter til reparation af software. For mere information besøg www.datanumen.com