Word құжатындағы нақты сөздердің бірінші әрпінің стилін өзгертудің 3 жылдам әдісі

Word шешімдері Қыркүйек 28, 2025

Осы мақалада біз сізге 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-әдіс: Барлық сөйлемдердегі бірінші сөздің бірінші әрпінің мәнерін өзгерту

Біріншіден, макросты 1-тәсілде көрсетілгендей етіп орнатыңыз және іске қосыңыз.
Содан кейін келесі макросты ауыстырыңыз:

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