3 kiiret viisi Wordi dokumendis praeguse lehe valimiseks

Selles postituses on meil hea meel tutvustada teile 3 kiiret viisi Wordi dokumendis praeguse lehe valimiseks.

Aeg-ajalt leiad end tõenäoliselt olukorrast, kus pead valima praeguse lehe sisu kopeerimiseks või eraldamiseks. Tavaliselt asetaksime kursori lehe algusesse ja hoiaksime kogu lehe valimiseks all vasakut hiireklahvi. Kuid pead tunnistama, et see meetod ei tööta alati hästi, kuna võib esineda vigu. Kuigi see pole raketiteadus, saad kiiremate meetodite abil aega kokku hoida.

Siin on meie 3 lahendust.

1. meetod: üheleheküljelise dokumendi klaviatuuri otseteed

Kui dokumendis on ainult üks leht, peate asetama sisestuskursori ükskõik kuhu dokumendi sees ja vajutama klahvikombinatsiooni Ctrl+A.

2. meetod: mitmeleheküljelise dokumendi klaviatuuri otseteed

Rääkides nüüd mitmelehelisest dokumendist, saate teha järgmisi samme:

1. Esiteks asetage kursor sihtlehe algusesse.
2. Järgmisena vajutage nuppu "Shift".
3. Seejärel kerige selle lehe allossa ja klõpsake lehe lõpus.

3. meetod: käivitage Wordi makro

1. Esiteks ja kõige tähtsam on klõpsata sihtlehel.
2. Seejärel klõpsake vahekaarti "Arendaja".
3. Järgmisena klõpsake VBA redaktori avamiseks "Visual Basic". Või vajutage selleks klahvikombinatsiooni Alt + F11.
4. Nüüd klõpsake "Tavaline" projekt ja seejärel vahekaart "Lisa".
5. Valige rippmenüüst "Moodul".
6. Järgmisena topeltklõpsake äsja sisestatud moodulil, et avada kodeerimisruum.
7. Kleepige sinna järgmised koodid:

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. Lõpuks klõpsake "Käivita" või vajutage "F5". Kõik sellel lehel olevad tekstid on nüüd valikus.

Taastage Wordi dokumendid

Oleks valus leida teie Wordi dokumendid rikutud, mis jätab teid oma teabele kättesaamatuks. Kindlasti ei taha keegi omada a korrumpeerunud dok. Kuid kui ta ootamatult juhtub, jääb ainsaks võimaluseks andmed tagasi hankida kas sisseehitatud või kolmanda osapoole tööriistaga.

Autori sissejuhatus:

Vera Chen on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas rikutud Excel ja pdf tarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom