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

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

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

მეთოდი 1: გამოიყენეთ "სტილების" ფანჯარა

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

თუმცა, ზოგჯერ მე-2 საფეხურზე შეიძლება ვერ იპოვოთ „სქოლიოების მითითება“ ან „ბოლო შენიშვნის მითითება“. აქ მოცემულია ნაბიჯები, რომელთა გადადგმაც შეგიძლიათ:

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

მეთოდი 2: გამოიყენეთ "ძებნა და ჩანაცვლება" ფუნქცია

1. თავდაპირველად, ასევე დააწკაპუნეთ ცხრილზე "მთავარი".
2. შემდეგ ამჯერად "რედაქტირების" ჯგუფში აირჩიეთ "ჩანაცვლება".
3. შემდეგ დიალოგურ ფანჯარაში "იპოვე და ჩაანაცვლე", მოათავსეთ კურსორი "იპოვე რა" ტექსტურ ყუთში.
4. და დააწკაპუნეთ "მეტი" ღილაკზე მეტი ვარიანტების გასადიდებლად.
5. შემდეგ დააჭირეთ ღილაკს "სპეციალური" ბოლოში.
6. შემდეგ აირჩიეთ "Endnote Mark" ან "Footnote Mark".
7. თუ აირჩევთ "Endnote Mark", "იპოვე რა" ტექსტურ ველში, იხილავთ "^e". თუ აირჩევთ „სქოლიოზე“, სავარაუდოდ ნახავთ „^f“.
8. ახლა შეინახეთ ტექსტის ყუთი „ჩანაცვლება“ ცარიელი.
9. დაბოლოს, დააწკაპუნეთ „ყველას ჩანაცვლება“ წასაშლელად, შემდეგ კი ყველა. ან დააწკაპუნეთ „ჩანაცვლება“, რათა სათითაოდ გადახედოთ მათ და გადაწყვიტოთ წაშალოთ თუ არა.

აქ თქვენ უნდა გესმოდეთ, თუ ზოგიერთი სქოლიო ან ბოლო შენიშვნა შეიცავს მორგებულ ნიშნებს, მათი გასუფთავება შეუძლებელია, მაგალითად, ქვემოთ:

მეთოდი 3: ჩაწერეთ მაკრო

მაგალითად, თუ გვინდა მოვიშოროთ ყველა სქოლიო, შეგვიძლია ჩავწეროთ მაკრო მე-2 მეთოდისთვის და სანაცვლოდ მივიღებთ კოდებს. შემდეგ კი შეგიძლიათ აირჩიოთ ღილაკის ან კლავიატურის მინიჭება მაკროსთვის, რომ მოგვიანებით გამოიყენოს იგი. რაც შეეხება მაკროს ჩაწერის მეთოდს, იხილეთ ეს სტატია: როგორ ამოიღოთ ჩასმული ტექსტების ფორმატირება მაკროთი და VBA-ით თქვენს Word-ში

შემდეგი კოდები გამოიყენება სქოლიოების წასაშლელად:

Sub DeleteFootnotes()
  Selection.Find.ClearFormatting
  Selection.Find.Replacement.ClearFormatting
  With Selection.Find
    .Text = "^f"
    .Replacement.Text = ""
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
  End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub

სხვათა შორის, ბოლო შენიშვნების წასაშლელად, თქვენ უბრალოდ უნდა შეცვალოთ „^f“ „^e“ კოდის სტრიქონში „.ტექსტი = „^f“".

მეთოდი 4: გამოიყენეთ VBA კოდები

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

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

Sub DeleteAllEndnotes()
  Dim objEndnote As Endnote

  For Each objEndnote In ActiveDocument.Endnotes
    objEndnote.Delete
  Next
End Sub

და ყველა სქოლიოს წასაშლელად, ჩასვით ეს კოდები:

Sub DeleteAllfootnotes()
  Dim objFootnote As Footnote

  For Each objFootnote In ActiveDocument.Footnotes
    objFootnote.Delete
  Next
End Sub

4. და ბოლოს, დააჭირეთ "გაშვება".

4 მეთოდის შედარება

შეასწორეთ დაზიანებული ფაილები

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

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

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