Ushbu maqolada biz siz bilan Word hujjatidagi barcha tagiga chizilgan matnlarni qidirishning ikkita tezkor usulini baham ko'rmoqchimiz.
Word hujjatida tagiga chizilganlarning ko'p bo'lishi odatiy hol emas. Shu sababli, pastki chiziq qo'llash bilan bog'liq juda ko'p talablar paydo bo'ladi. Keling, bunday so'rovlarni ko'rib chiqaylik.
- Belgilangan bo'shliqlarni toping. Siz birinchi fikrda o'zingizni yo'qotishingiz mumkin. Ammo, shunday o'ylashingiz mumkinki, Word hujjatida imtihonni to'ldirganda, javobsiz qolgan savol bor-yo'qligini bilish uchun faylni qidirishingiz kerak bo'ladi.
- Matnlar bo'ylab urish usulini o'zgartiring. Siz ularni tagiga chizish orqali matnlarni ajratib ko'rsatishingiz mumkin. Biroq, kursiv shrift uslubi bilan matnlarni qo'llash kabi boshqa vositalar ham mavjud.
- Pastki chiziq rangini o'zgartiring. Siz diqqatni jalb qilish uchun pastki chiziq rangini o'zgartirishingiz mumkin.
Yuqoridagi talablarga javob berish uchun bitta umumiy qadam bor, bu birinchi navbatda pastki chiziqni qidirishdir. Va bizning 2 usulimiz:
1-usul: "Kengaytirilgan qidirish" opsiyasidan foydalaning
- Boshlash uchun "Bosh sahifa" yorlig'ini bosing.
- Keyin "Topish" orqasidagi teskari uchburchak tugmachasini bosing.
- Keyin "Kengaytirilgan qidiruv" ni tanlang.
- "Topish va almashtirish" dialog oynasida "Formatlash" tugmasini bosing.
- Keyin "Shrift" ni tanlang.
- "Shriftni topish" oynasida hujjatingizda qo'llaniladigan pastki chiziq uslubini tanlang va "OK" tugmasini bosing.
- Endi "Topish" ni, keyin "Asosiy hujjat" ni bosing yoki "Keyingisini topish" tugmasini bosing. Birinchisi hujjatdagi barcha pastki chiziqni tanlaydi, ikkinchisi esa sizni birma-bir tagiga chizishga olib boradi.
Aytgancha, agar siz 4-6-bosqichni o'tkazib yubormoqchi bo'lsangiz, yorliqlardan foydalanishingiz mumkin. “Ctrl+U” bitta tagiga chizilgan va “Ctrl + Shift + D”, qo'shaloq tagiga chizilgan.
2-usul: Word makrosini ishga tushiring
- Dastlab, VBA muharririni yaratish uchun "Dasturchi" yorlig'ini va keyin "Visual Basic" ni bosing. Muqobil usul - "Alt + F11" tugmachasini bosish.
- Keyin, "Oddiy" tugmasini bosing.
- Keyin "Qo'shish" yorlig'ini bosing va "Modul" ni tanlang.
- Endi siz "Oddiy" loyihasi ostida yangi modulni muvaffaqiyatli kiritdingiz. Tahrirlash maydonini ochish uchun yangi modulni ikki marta bosing.
- Keyin u erga quyidagi kodlarni joylashtiring:
Sub FindUnderlineInDoc()
Dim objDoc As Document
Dim objRange As Range
Set objDoc = ActiveDocument
Set objRange = objDoc.Range
objRange.Find.ClearFormatting
objRange.Find.Font.Underline = wdUnderlineSingle
With Selection.Find
.text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = True
.Execute
End With
End Sub
- Nihoyat, "Ishga tushirish" tugmasini bosing.
Eslatma:
Kod qatori "objRange.Find.Font.Underline = wdUnderlineSingle” degani bu makros bitta pastki chiziq topadi. Shunday qilib, boshqa uslublar bilan tagiga chizishni topish uchun "" ni almashtirishingiz kerak.wdUnderlineSingle” boshqa konstantalar bilan, bu yerda koʻproq topishingiz mumkin: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa224269(v=office.11)
So'z xatolari bilan kurashish
Hisobotlaringizni tuzayotganda, siz biror marta duch kelganmisiz? buzilgan Word, shuning uchun siz ishlayotgan faylni yo'qotasizmi? Bunday stsenariy biz kutgan eng kam narsa. Shunga qaramay, bu sodir bo'ladi va insonning martaba uchun halokatli zarba bo'lishi mumkin. Shunday qilib, vaqtingizni va martabangizni tejash uchun sizga Word dasturini ta'mirlash uchun ham professional kerak bo'ladi.
Muallif kirish:
Vera Chen - ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc xls tuzatish va pdf dasturiy mahsulotlarni ta'mirlash. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com