ამ სტატიაში ჩვენ ყურადღებას გავამახვილებთ 2 სწრაფი გზის ახსნაზე, რათა შეცვალოთ რამდენიმე ხაზგასმული ფერი თქვენს Word დოკუმენტში.
ნაგულისხმევად, Word-ში ხაზგასმული ფერი დაყენებულია როგორც „ავტომატური“. მაგრამ ზოგჯერ შეიძლება ერთფეროვანი იყოს. ასე რომ, თქვენი დოკუმენტის ფერების დივერსიფიკაციისთვის და მნიშვნელოვანი შიგთავსის გამოსაყოფად, კარგი არჩევანია ხაზგასმის ფერის შეცვლა.
ხაზგასმული ფერის შეცვლა ადვილია მის შექმნამდე. აქედან გამომდინარე, შემდეგ შიგთავსში გვინდა ყურადღება გავამახვილოთ არსებული ხაზგასმების ფერის შეცვლაზე.
მეთოდი 1: გამოიყენეთ "Advanced Find" ფუნქცია
პირველ რიგში, მიმდინარე დოკუმენტში უნდა იპოვოთ ყველა ხაზგასმული ეგზემპლარი. ამისათვის შეგიძლიათ იხილოთ ჩვენი წინა სტატია: 2 სწრაფი გზა ხაზგასმული ტექსტების მოსაძებნად თქვენს Word დოკუმენტში
შერჩევისას ყველა ხაზგასმის პოვნისა და არჩევის შემდეგ, თქვენ გადადგით შემდეგი ნაბიჯები:
- თქვენ უბრალოდ დააწკაპუნეთ თავდაყირა სამკუთხედის ღილაკზე ხაზგასმული ხატის უკან „მთავარი“ ჩანართში.
- შემდეგ აირჩიეთ ფერი, რომელიც მოგწონთ გაფართოებულ მენიუში "Underline Color".

აქ არის ჩვენი ვიდეო დემონსტრაცია:
მეთოდი 2: გაუშვით Word მაკრო
Word მაკრო ისეთი საოცარი ინსტრუმენტია. ჩვენ შეგვიძლია არა მხოლოდ გამოვიყენოთ ყველა ხაზის მოსაძებნად, არამედ მათი ფერის შეცვლაც. და ორივე პროცედურა შეიძლება დასრულდეს მხოლოდ ერთ მაკროში.
- დასაწყისისთვის, გააქტიურეთ ჩანართი "დეველოპერი" და დააწკაპუნეთ მასზე.
- შემდეგ დააჭირეთ "Visual Basic" ჯგუფში "კოდი".
- შემდეგ დააჭირეთ "ნორმალური".
- შემდეგ დააჭირეთ "ჩასმა" ჩანართს.
- და აირჩიეთ "მოდული" მენიუში.
- ორჯერ დააწკაპუნეთ ახალ მოდულზე რედაქტირების სივრცის გასახსნელად.
- ახლა ჩასვით ქვემოთ მოცემული კოდები იქ:
Sub ChangeUnderlineColor()
Dim objDoc As Document
Dim objRange As Range
Set objDoc = ActiveDocument
Set objRange = objDoc.Range
objRange.Find.ClearFormatting
With objRange.Find
.Font.Underline = wdUnderlineSingle
.text = ""
.Replacement.text = ""
.Replacement.Font.UnderlineColor = wdColorBlue
.Execute Format:=True, Replace:=wdReplaceAll
End With
End Sub
- დაბოლოს, მაგრამ არანაკლებ მნიშვნელოვანია, დააჭირეთ ღილაკს "გაშვება".
შენიშვნები:
- პირველ რიგში, კოდის ხაზი „.Font.Underline = wdUnderlineSingle“ ნიშნავს, რომ ეს მაკრო პოულობს მხოლოდ ცალკეულ ხაზგასმას. თქვენ შეგიძლიათ შეცვალოთ „wdUnderlineSingle“ „wdUnderlineDouble“, „wdUnderlineThick“ და ა.შ. მეტი ხაზგასმული მუდმივებისთვის, შეგიძლიათ ეწვიოთ ამ ბმულს: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa224269(v=office.11)
- მეორე, კოდის ხაზი „.Replacement.Font.UnderlineColor = wdColorBlue“ ნიშნავს, რომ მაკრო ხაზგასმის ფერს ლურჯად შეცვლის. და მეტი ფერის მუდმივობისთვის შეგიძლიათ ეწვიოთ: https://docs.microsoft.com/en-us/office/vba/api/Word.WdColor
ამოიღეთ კომპრომეტირებული Word მონაცემები
Word-ში მონაცემების დაკარგვა დღესდღეობით ძალიან შესაძლებელია. მაგალითად, Word-ში ყველაზე გავრცელებული შეცდომა ეკრანის გაყინვაა. რა თქმა უნდა, შეგიძლიათ პროგრამის გადატვირთვა. ზოგჯერ, დოკუმენტის ავტომატურად შენახული ვერსია იქნება, რომელზეც მუშაობთ. თუმცა, ჩვენ არ შეგვიძლია გამოვრიცხოთ ან დავუშვათ დოკუმენტის სრულად ან ნაწილობრივ დაკარგვის შესაძლებლობა. ამრიგად, უნდა ვიფიქროთ მონაცემების აღდგენის გზებზე. და ამასთან დაკავშირებით, პროფესიონალი... სიტყვების შეკეთება ინსტრუმენტი მისი წარმატების გასაღებია.
ავტორი შესავალი:
ვერა ჩენი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის სარემონტო ხელსაწყოებში დაზიანებული xls მდე pdf პროგრამული პროდუქტების შეკეთება. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად


