Word құжатындағы ағымдағы бетті таңдаудың 3 жылдам жолы

Бұл жазбада біз сізге Word құжатындағы ағымдағы бетті таңдаудың 3 жылдам әдісін ұсынуға қуаныштымыз.

Кейде мазмұнды көшіру немесе алу үшін ағымдағы бетті таңдау қажет болуы мүмкін. Әдетте, біз курсорды беттің басына қойып, бүкіл бетті таңдау үшін тінтуірдің сол жақ батырмасын басып тұрамыз. Бірақ бұл әдіс әрқашан жақсы жұмыс істемейтінін мойындауыңыз керек, себебі қателер орын алуы мүмкін. Жұмысты орындау оңай болмаса да, жылдам әдістерді қолдану арқылы уақытыңызды үнемдей аласыз.

Міне, біздің 3 шешіміміз.

1-әдіс: Бір беттік құжат үшін пернелер тіркесімдері

Құжатта тек бір бет болғанда, кірістіру көрсеткішін құжаттың кез келген жеріне қойып, «Ctrl+ A» пернелерін басу керек.

2-әдіс: Көп бетті құжат үшін пернелер тіркесімдері

Енді көп беттік құжат туралы айтатын болсақ, келесі қадамдарды орындауға болады:

1. Алдымен, кірістіру көрсеткішін мақсатты беттің басына орналастырыңыз.
2. Әрі қарай «Shift» түймесін басыңыз.
3. Содан кейін сол беттің төменгі жағына қарай жылжып, беттің соңында басыңыз.

3-әдіс: Word макросын іске қосыңыз

1. Ең алдымен, мақсатты бетті басыңыз.
2. Содан кейін «Әзірлеуші» қойындысын нұқыңыз.
3. Содан кейін VBA редакторын ашу үшін «Visual Basic» түймесін басыңыз. Немесе мұны істеу үшін «Alt+ F11» пернесін басыңыз.
4. Енді «Қалыпты» жобаны, содан кейін «Кірістіру» қойындысын басыңыз.
5. Ашылмалы мәзірден «Модуль» тармағын таңдаңыз.
6. Келесі кодтау кеңістігін ашу үшін жаңадан енгізілген модульді екі рет басыңыз.
7. Келесі кодтарды сол жерге қойыңыз:

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. Соңында «Іске қосу» түймесін басыңыз немесе «F5» түймесін басыңыз. Сол беттегі барлық мәтіндер қазір таңдауда.

Word құжаттарын қалпына келтіру

Word құжаттарыңыздың бүлінгенін табу өте ауыр болады, бұл сізді ақпаратқа қол жеткізе алмайды. Әрине, ешкімнің болғысы келмейді сыбайлас құжат. Дегенмен, ол күтпеген жерден орын алған кезде, деректерді кірістірілген немесе үшінші тарап құралы арқылы қайтарып алу ғана қалады.

Автордың кіріспесі:

Вера Чен - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. бүлінген Excel және pdf бағдарламалық жасақтама өнімдерін жөндеу. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com