3 სწრაფი გზა თქვენს Word დოკუმენტში მიმდინარე გვერდის ასარჩევად

სიტყვის გადაწყვეტილებები სექტემბერი 28, 2025

ამ პოსტში, ჩვენ სიამოვნებით წარმოგიდგენთ 3 სწრაფ გზას, თუ როგორ აირჩიოთ მიმდინარე გვერდი თქვენს Word დოკუმენტში.

დროდადრო, შესაძლოა, საჭირო გახდეს მიმდინარე გვერდის არჩევა შინაარსის კოპირების ან ამოსაღებად. ჩვეულებრივ, კურსორს გვერდის დასაწყისში მოვათავსებდით და მთელი გვერდის ასარჩევად მარცხენა ღილაკით დავაჭერთ. თუმცა, უნდა აღიაროთ, რომ ეს მეთოდი ყოველთვის კარგად არ მუშაობს, რადგან შეიძლება შეცდომები წარმოიშვას. მიუხედავად იმისა, რომ ეს სამუშაო რთული არ არის, შეგიძლიათ დაზოგოთ დრო უფრო სწრაფი მეთოდების გამოყენებით.

აქ არის ჩვენი 3 გამოსავალი.

მეთოდი 1: კლავიატურის მალსახმობები ერთგვერდიანი დოკუმენტისთვის

როდესაც დოკუმენტში მხოლოდ ერთი გვერდია, ის, რაც უნდა გააკეთოთ, არის მოათავსოთ თქვენი ჩასმის მაჩვენებელი დოკუმენტის შიგნით ნებისმიერ ადგილას და დააჭირეთ "Ctrl+ A".

მეთოდი 2: კლავიატურის მალსახმობები მრავალგვერდიანი დოკუმენტისთვის

ახლა, მრავალგვერდიან დოკუმენტზე საუბრისას, შეგიძლიათ გადადგათ შემდეგი ნაბიჯები:

პირველ რიგში, ჩასმის მაჩვენებელი მოათავსეთ სამიზნე გვერდის დასაწყისში.
შემდეგ დააჭირეთ "Shift".
შემდეგ გადაახვიეთ ამ გვერდის ბოლოში და დააწკაპუნეთ გვერდის ბოლოს.

მეთოდი 3: გაუშვით Word მაკრო

პირველ რიგში, დააწკაპუნეთ სამიზნე გვერდზე.
შემდეგ დააჭირეთ "დეველოპერი" ჩანართს.
შემდეგ დააჭირეთ "Visual Basic"-ს VBA რედაქტორის გასახსნელად. ან დააჭირეთ "Alt+ F11" ამისათვის.
ახლა დააწკაპუნეთ "ნორმალური" პროექტზე და შემდეგ "ჩასმა" ჩანართზე.
ჩამოსაშლელი მენიუში აირჩიეთ "მოდული".
შემდეგი ორჯერ დააწკაპუნეთ ახლად ჩასმულ მოდულზე კოდირების სივრცის გასახსნელად.
ჩასვით იქ შემდეგი კოდები:

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

დაბოლოს, დააჭირეთ "Run" ან დააჭირეთ "F5". ამ გვერდზე ყველა ტექსტი ახლა შერჩეულია.

Word დოკუმენტების აღდგენა

ძალიან მტკივნეული იქნებოდა თქვენი Word დოკუმენტების დაზიანებული დანახვა, რაც თქვენს ინფორმაციას მიუწვდომელი გახდის. რა თქმა უნდა, არავის სურს ჰქონდეს ა კორუმპირებული დოქ. თუმცა, როდესაც ის მოულოდნელი ხდება, ერთადერთი ვარიანტი რჩება არის მონაცემების უკან დაბრუნება ან ჩაშენებული ან მესამე მხარის ხელსაწყოებით.

ავტორი შესავალი:

ვერა ჩენი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის დაზიანებული Excel მდე pdf პროგრამული პროდუქტების შეკეთება. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად