Доорх нийтлэлд бид танд Word баримт дээрээ бүдэг бадаг хайлт хийх 2 ашигтай аргыг өгөхийг хүсч байна.
Бид үгийг хэрхэн зөв бичихээ, ялангуяа урт үгийг хэрхэн зөв бичихээ мартах тохиолдол хааяа гардаг. Ихэнх тохиолдолд бид цөөн хэдэн эхний үсгийг л бараг санадаггүй. Энэ нь үнэн зөв хайлтыг бараг боломжгүй болгодог.
Бидний хувьд азтай, ойлгомжгүй хайлт хийх аргууд байдаг. Та тэдгээрийг Word баримт бичигтээ ашиглаж болно.
Арга 1: Word дээр "Advanced Find" функцийг ашигла
Бидний хувьд бид “DataNumen"Өгөгдөл" -өөс эхэлж санаж байна гэж бодъё.
- Нэгдүгээрт, "Нүүр хуудас" таб дээрх "Засварлах" бүлэгт "Хайх" командын хажууд байрлах доош товшино уу.
- Мөн цэснээс "Advanced Find" сонголтыг сонгоно уу.
- Дараа нь "Find what" текст хайрцагт оруулах заагчийг оруулаад дараахь тэмдэгтүүдийг оруулна уу:
- "Өгөгдөл" гэдэг нь зорилтот үгийн эхний үсэг юм. Та үүнийг жинхэнэ үсгээр солих хэрэгтэй. Хэрэв та эхний үсгээ мартсан бол хоосон орхиж, зай ч оруулахгүй.
- "n,m" нь эхний үсгийг оруулаагүй зорилтот үгийн үлдсэн үсгийн уртын тоог илэрхийлнэ. Энэ тохиолдолд "5" тоо гэж үзье. Тиймээс орлуулалтын тэмдэгтүүд дараах байдлаар харагдах ёстой:
- Хэрэв та үсгийн уртыг нарийн тоогоор мэдэхгүй бол дараахь мужийг зааж өгсөн 2 тоог оруулж болно.
- Хэрэв та үсгийн урт нь тодорхой тоотой тэнцүү эсвэл том байна гэдэгт итгэлтэй байвал үүнийг дараах байдлаар илэрхийлж оруулна уу.
- Дараа нь илүү олон сонголтыг гаргаж авахын тулд "Илүү" дээр дарна уу.
- "Тэмдэгт тэмдэг ашиглах" хайрцгийг шалгана уу.
- Дараа нь "Find In" дээр дарж "Main Document" -ыг сонгоно уу.
Та сонголтонд зорилтот үгийн бүх тохиолдлыг харах болно.
Арга 2: Текст хайхын тулд VBA кодуудыг ажиллуулна уу
VBA код ажиллуулах нь илэрхийлэл цээжлэхээс аврах болно.
- Юуны өмнө, Word дээр VBA засварлагчийг ажиллуулахын тулд "Alt" + "F11" товчийг дарна уу.
- Дараа нь "Normal" төслийг дараад "Insert" дээр дарна уу.
- Цэснээс "Модуль" -г сонгоно уу.
- Үүн дээр давхар товшоод дараах кодыг нээгээд наана уу:
Sub FindTheWordsByLength()
Dim objRange As Range
Dim strStartWord As String
Dim strLength As String
strStartWord = InputBox("Enter the beginning letters which you remember of target word ", "Beginning Letters of Word", "For example:Data")
strLength = InputBox("Enter the letter length of the rest part of target word which you don't remember", "Number of Letter Length", "For example:5,7")
With Selection
.HomeKey Unit:=wdStory
Selection.Find.ClearFormatting
With Selection.Find
.Text = "<" & strStartWord & "[a-zA-Z]{" & strLength & "}>"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
.Execute
End With
Do While .Find.Found
Set objRange = Selection.Range
objRange.HighlightColorIndex = wdYellow
.Collapse wdCollapseEnd
.Find.Execute
Loop
End With
End Sub
- Дараа нь макро ажиллуулахын тулд “F5” дээр дарна уу.
- Гарч ирэх эхний цонхонд зорилтот үгийн эхний үсгийг оруулаад "OK" товчийг дарж үргэлжлүүлнэ үү.
- Хоёрдахь нүдэнд урт үсгийн тоог оруулаад "OK" дээр дарна уу. Таслалыг ашиглан тоонуудыг салгана уу.
Эцэст нь олдсон бүх үгсийг шар өнгөөр тодруулах болно.
Үгийн асуудлуудыг засах
Ихэнх тохиолдолд Word дээр янз бүрийн асуудал гарах магадлалтай байдаг. Зарим ноцтой нь програм хангамжийг нурахад хүргэж болзошгүй юм. Мөн а завхарсан үг үнэ цэнэтэй өгөгдлийг алдахад хүргэж болзошгүй юм. Тиймээс асуудал гарсны дараа та яаралтай арга хэмжээ авах ёстой.
Зохиогчийн танилцуулга:
Вера Чен бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. авлигаас давуу болон pdf програм хангамжийн бүтээгдэхүүнийг засах. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com





