Word баримт дээрх одоогийн хуудсыг сонгох 3 хурдан арга

Энэ бичлэгт бид танд Word баримт бичигт байгаа хуудсыг сонгох 3 хурдан аргыг танилцуулж байгаадаа баяртай байна.

Хааяа та агуулгыг хуулах эсвэл задлахын тулд одоогийн хуудсыг сонгох шаардлагатай болж магадгүй юм. Ер нь бид хуудсын эхэнд курсороо байрлуулж, хуудсыг бүхэлд нь сонгохын тулд зүүн товчийг дардаг. Гэхдээ алдаа гарч болзошгүй тул энэ арга нь үргэлж сайн ажилладаггүй гэдгийг та хүлээн зөвшөөрөх хэрэгтэй. Энэ ажлыг хийхэд тийм ч хялбар биш ч гэсэн та илүү хурдан аргуудыг ашигласнаар цагаа хэмнэж чадна.

Энд бидний 3 шийдэл байна.

Арга 1: Нэг хуудас баримт бичгийн гарын товчлолууд

Баримт бичигт зөвхөн нэг хуудас байгаа тохиолдолд та оруулах заагчаа документын аль ч хэсэгт байрлуулж, "Ctrl + A" товчийг дарна уу.

Арга 2: Олон хуудас баримт бичгийн гарын товчлолууд

Одоо олон хуудастай баримт бичгийн талаар ярихад та дараах алхмуудыг хийж болно.

1. Эхлээд оруулах заагчийг зорилтот хуудасны эхэнд байрлуулна уу.
2. Дараа нь "Shift" дээр дарна уу.
3. Дараа нь хуудасны доод талд гүйлгээд хуудасны төгсгөлд товшино уу.

Арга 3: Word макро ажиллуулах

1. Юуны өмнө зорилтот хуудсан дээр дарна уу.
2. Дараа нь "Хөгжүүлэгч" таб дээр дарна уу.
3. Дараа нь "Visual Basic" дээр дарж VBA засварлагчийг нээнэ үү. Эсвэл үүнийг хийхийн тулд "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. Эцэст нь "Run" эсвэл "F5" товчийг дарна уу. Энэ хуудсан дээрх бүх бичвэрүүд одоо сонгогдсон байна.

Word баримтуудыг сэргээх

Таны Word баримтыг гэмтээж, таны мэдээлэлд нэвтрэх боломжгүй болгох нь маш их зовлонтой байх болно. Мэдээжийн хэрэг, хэн ч байхыг хүсдэггүй авлигач Doc. Гэсэн хэдий ч түүнд гэнэтийн зүйл тохиолдоход цорын ганц сонголт бол суулгасан эсвэл гуравдагч талын хэрэгслээр өгөгдлийг буцааж авах явдал юм.

Зохиогчийн танилцуулга:

Вера Чен бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. эвдэрсэн Excel болон pdf програм хангамжийн бүтээгдэхүүнийг засах. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com