Энэ нийтлэлд бид таны Word баримт бичигт тодорхой үгийн эхний үсгийн хэв маягийг өөрчлөх 3 аргыг танилцуулахыг хүсч байна.
Баримтыг форматлах нийтлэг дүрмүүдийн нэг бол өгүүлбэр бүрийн эхний үсгийг томоор бичих явдал юм. Гэхдээ уран сайхны баримт бичиг дээр ажиллах гэх мэт зарим онцгой тохиолдолд бидний биелүүлэх ёстой тодорхой шаардлагууд байдаг.
Мөн энэ бичлэгт бид танд 3 өөр шаардлагын дагуу үгсийн эхний үсгийн хэв маягийг өөрчлөх 3 аргыг харуулах болно.
Арга 1: Баримт бичгийн үг бүрийн эхний үсгийн хэв маягийг өөрчлөх
- Юуны өмнө, Word дээр VBA засварлагчийг ажиллуулахын тулд "Alt" + "F11" товчийг дарна уу.
- Дараа нь зүүн баган дээрх "Хэвийн" дээр дарна уу.
- Дараа нь цэсний мөрөнд "Оруулах" дээр дарна уу.
- Унтраах цэс дээр "Модуль" дээр дарна уу.
- Одоо шинэ модуль дээр давхар товшоод нээгээд дараах кодыг наана уу:
Sub ChangeStyleOfFirstLetterInWords()
Dim objWord As Range
For Each objWord In ActiveDocument.Words
' Change the font size for the first letter in every word.
objWord.Characters(1).Font.Size = 16
' Set Bold font for the first letter in every word.
objWord.Characters(1).Font.Bold = True
' Change the font color for the first letter in every word.
objWord.Characters(1).Font.Color = wdColorGreen
Next
End Sub
- Эцэст нь "Ажиллуулах" дээр дарна уу.
Үр дүн энд байна:
Тайлбар:
-
Characters(1).Font.Size = 16
Энэ нь эхний үсгийн фонтын хэмжээг 16-д тохируулна. Тоог хүссэнээрээ солино.
-
Characters(1).Font.Bold = True
Энэ мөрөнд эхний үсгийг тод үсгээр тохируулна. Хэрэв танд шаардлагагүй бол "Үнэн" -ийг "Худал" болгож өөрчлөх боломжтой.
-
Characters(1).Font.Color = wdColorGreen
Энэ нь үсэгт ногоон өнгийг хэрэглэнэ. Дараах линкээр орж хүссэн өнгөөө сонгоно уу. https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa195614(v=office.11)
Арга 2: Бүх өгүүлбэр дэх эхний үгийн эхний үсгийн хэв маягийг өөрчлөх
- Нэгдүгээрт, макро суулгаж ажиллуулна уу.
- Дараа нь дараахь макрооор солино уу:
Sub ChangeStyleOfFirstLetterInSentence()
Dim objSentence As Range
For Each objSentence In ActiveDocument.Sentences
' Change the font size for the first letter in every sentence.
objSentence.Words(1).Characters(1).Font.Size = 16
' Set Bold font for the first letter in every sentence.
objSentence.Words(1).Characters(1).Font.Bold = True
' Change the font color for the first letter in every sentence.
objSentence.Words(1).Characters(1).Font.Color = wdColorGreen
Next
End Sub
Үр дүнг шалгах:
Арга 3: Бүх догол мөрөнд эхний үгийн эхний үсгийн хэв маягийг өөрчлөх
- Үүнтэй адилаар 1-р аргын дараахь алхмуудыг макро суулгаж ажиллуулна уу.
- Дараа нь энэ макро ашиглана уу:
Sub ChangeStyleOfFirstLetterInParagraphs()
Dim objParagraph As Word.Paragraph
For Each objParagraph In ActiveDocument.Paragraphs
' Change the font size for the first letter in every paragraph.
objParagraph.Range.Words(1).Characters(1).Font.Size = 16
' Set Bold font for the first letter in every paragraph.
objParagraph.Range.Words(1).Characters(1).Font.Bold = True
' Change the font color for the first letter in every paragraph.
objParagraph.Range.Words(1).Characters(1).Font.Bold = True
Next
End Sub
Дэлгэцийн зургийг үзнэ үү:
Өгөгдөл алдахтай ажиллах хамгийн сайн арга
Мэдээллийн маш чухал алдагдал маш их стресст ордог. Тиймээс ийм гамшигтай хэрхэн харьцахаа мэдэх ёстой. Мэдээжийн хэрэг, таны хамгийн сайн шийдэл бол а док засвар хэрэгсэл. Үүний тусламжтайгаар та өгөгдлөө хамгийн богино хугацаанд буцааж авах боломжтой.
Зохиогчийн танилцуулга:
Вера Чен бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. Excel засвар болон pdf програм хангамжийн бүтээгдэхүүнийг засах. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com




