3 бързи начина за промяна на стила на първата буква на конкретни думи в документа на Word

Споделете сега:

В тази статия бихме искали да ви представим 3 метода за промяна на стила на първата буква на конкретни думи във вашия документ на Word.

Едно от често срещаните правила за форматиране на документ е да се изписва с главна буква първата буква на всяко изречение. Но в някои специални случаи, като например работа по художествен документ, има специфични изисквания, на които трябва да отговаряме.

И в тази публикация ще ви покажем 3 начина да промените стила на първата буква на думите според 3 различни изисквания.Променете стила на първата буква на конкретни думи в документа на Word

Метод 1: Променете стила на първата буква на всяка дума в документ

  1. Първо и най-важно, натиснете „Alt+F11“, за да извикате VBA редактора в Word.
  2. След това щракнете върху „Нормално“ в лявата колона.
  3. След това в лентата с менюта щракнете върху „Вмъкване“.
  4. И щракнете върху „Модул“ в падащото меню.Щракнете върху "Нормално" -> Щракнете върху "Вмъкване" -> Щракнете върху "Модул"
  5. Сега щракнете двукратно върху нов модул, за да го отворите и поставете следните кодове там:
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
  1. Накрая щракнете върху „Run“.Поставяне на кодове-> Щракнете върху "Изпълни"

Ето резултата:Оформете първата буква от всяка дума в документ

Забележки:

  1. Characters(1).Font.Size = 16

Това задава размера на шрифта на първата буква в 16. Променете номера, както искате.

  1. Characters(1).Font.Bold = True

Този ред задава първата буква с получер шрифт. Можете да промените „True“ на „False“, ако нямате нужда.

  1. Characters(1).Font.Color = wdColorGreen

Това прилага зеления цвят към буквата. Посетете следната връзка, за да изберете желания цвят: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa195614(v=office.11)

Метод 2: Променете стила на първата буква от първата дума във всички изречения

  1. Първо, инсталирайте и стартирайте макрос, както е показано в метод 1.
  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. По същия начин инсталирайте и стартирайте макрос, като следвате стъпки в метод 1.
  2. След това използвайте този макрос:
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

Споделете сега:

Коментарите са забранени.