3 გზა, რომ მიიღოთ კონკრეტული თვალთვალის ცვლილებები მხოლოდ თქვენს Word დოკუმენტში

ამ სტატიაში გვინდა გაგიზიაროთ 3 გზა, რომ მიიღოთ კონკრეტული თვალყურის დევნება მხოლოდ თქვენს Word დოკუმენტში.

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

ქვემოთ მოცემულია 3 მიდგომა კონკრეტული თვალთვალის ცვლილებების მისაღებად მხოლოდ სხვადასხვა შემთხვევაში.

მეთოდი 1: მიიღეთ კონკრეტული ტიპის ყველა თვალთვალის ცვლილება

აქ, ვთქვათ, ჩვენ უნდა მივიღოთ დოკუმენტის ფორმატირების ყველა ცვლილება.

1. პირველ რიგში, დააწკაპუნეთ ჩანართზე "მიმოხილვა".
2. შემდეგ დააჭირეთ ბრძანებას "აჩვენე მარკირება".
3. შემდეგ ჩამოსაშლელ მენიუში მონიშნეთ მხოლოდ "ფორმატირების" ველი.
4. ახლა თქვენ შეგიძლიათ ნახოთ მხოლოდ ფორმატის ცვლილებები ნაჩვენები დოკუმენტში. დააჭირეთ ჩამოსაშლელ ღილაკს "მიღება" ბრძანებაზე.
5. და აირჩიეთ "ჩვენებული ყველა ცვლილების მიღება".

ანალოგიურად, სხვა ცვლილებების მისაღებად, უბრალოდ აჩვენეთ მხოლოდ ამ ტიპის ცვლილებები დოკუმენტში და მიიღეთ ისინი.

მეთოდი 2: მიიღეთ მხოლოდ წაშლა ან ჩასმა

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

1. უპირველეს ყოვლისა, დააჭირეთ ღილაკს "Alt+ F11", რათა ჩართოთ VBA რედაქტორი Word-ში.
2. შემდეგ დააჭირეთ "ნორმალური" პროექტს და დააჭირეთ "ჩასმა" მენიუს ზოლში.
3. და აირჩიეთ "მოდული" ამ მენიუში ახალი ჩასასმელად.
4. შემდეგ ორჯერ დააწკაპუნეთ მოდულის გასახსნელად და ჩასვით შემდეგი კოდები:

Sub AcceptOnlyDeletionsInDoc()
  Dim objRevision As Revision
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
 
  For Each objRevision In objDoc.Revisions
    With objRevision
      If .Type = wdRevisionDelete Then
        .Accept
      End If
    End With
  Next objRevision
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

5. დაბოლოს, დააჭირეთ ღილაკს "გაშვება" ან უბრალოდ დააჭირეთ "F5" კოდების შესასრულებლად.

ეს მაკრო იღებს ყველა წაშლას დოკუმენტში. რაც შეეხება ყველა ჩასმას, თქვენ უბრალოდ შეცვალეთ ეს მაკრო:

Sub AcceptOnlyInsertionsInDoc()
  Dim objRevision As Revision
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
 
  For Each objRevision In objDoc.Revisions
    With objRevision
      If .Type = wdRevisionInsert Then
        .Accept
      End If
    End With
  Next objRevision
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

მეთოდი 3: დაეთანხმე ყველა ცვლილებას შერჩევაში

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

1. სtart ერთად, გააკეთეთ არჩევანი tarდიაპაზონის მიღება.
2. შემდეგ დააჭირეთ "მიმოხილვა" ჩანართს ლენტით.
3. შემდეგ დააჭირეთ ჩამოსაშლელ ღილაკს "მიღება" ბრძანებაზე.
4. ჩამოსაშლელ მენიუში აირჩიეთ "ცვლილებების მიღება". და ეს არის ის.

მონაცემთა დაკარგვა ყველგან აღწევს

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

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

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