Word sənədinizdə xüsusi sözlərin birinci hərfinin üslubunu dəyişdirməyin 3 sürətli yolu

Bu yazıda sizə Word sənədinizdə konkret sözlərin ilk hərfinin üslubunu dəyişmək üçün 3 üsul təqdim etmək istərdik.

Sənədin formatlaşdırılmasının ümumi qaydalarından biri hər cümlənin ilk hərfinin böyük hərflə yazılmasıdır. Ancaq bəzi xüsusi hallarda, məsələn, bədii sənəd üzərində işləmək üçün bizim yerinə yetirməli olduğumuz xüsusi tələblər var.

Və bu yazıda sizə 3 fərqli tələbə uyğun olaraq sözlərin ilk hərfinin stilini dəyişdirməyin 3 yolunu göstərəcəyik.

Metod 1: Sənəddəki hər sözün birinci hərfinin üslubunu dəyişdirin

1. İlk növbədə, Word-də VBA redaktorunu işə salmaq üçün "Alt" + "F11" düymələrini basın.
2. Sonra sol sütunda "Normal" düyməsini basın.
3. Sonrakı menyu çubuğunda "Daxil et" düyməsini basın.
4. Və açılan menyuda "Modul" düyməsini basın.
5. İndi onu açmaq üçün yeni modulun üzərinə iki dəfə klikləyin və aşağıdakı kodları ora yapışdırın:

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

6. Nəhayət, "Çalıştır" düyməsini basın.

Nəticə budur:

Qeydlər:

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

Bu, 16-da ilk hərfin şrift ölçüsünü təyin edir. Nömrəni istədiyiniz kimi dəyişdirin.

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

Bu sətir qalın hərflə ilk hərfi təyin edir. Əgər ehtiyacınız yoxdursa, "Doğru"nu "Yanlış"a dəyişə bilərsiniz.

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

Bu hərf üçün yaşıl rəng tətbiq edir. İstədiyiniz rəngi seçmək üçün aşağıdakı linkə daxil olun: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa195614(v=office.11)

Metod 2: Bütün cümlələrdə ilk sözün ilk hərfinin üslubunu dəyişdirin

1. Əvvəlcə 1-ci üsulda göstərildiyi kimi makronu quraşdırın və işləyin.
2. Sonra bu makro ilə əvəz edin:

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

Nəticəni yoxlayın:

Metod 3: Bütün paraqraflarda ilk sözün birinci hərfinin üslubunu dəyişdirin

1. Eynilə, 1-ci üsuldakı addımları izləyən makro quraşdırın və işə salın.
2. Sonra bu makrodan istifadə edin:

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

Ekran görüntüsünə baxın:

Məlumat itkisini idarə etmək üçün ən yaxşı yanaşma

Kritik məlumat itkisi çox stresli ola bilər. Buna görə də, belə bir fəlakətlə necə davranacağınızı bilməlisiniz. Və əlbəttə ki, ən yaxşı həlliniz a-nı tutmaqdır doc təmir kommunal. Bununla, məlumatlarınızı ən qısa müddətdə geri ala bilərsiniz.

Müəllif Giriş:

Vera Çen məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc Excel təmiri və pdf proqram məhsullarının təmiri. Ətraflı məlumat üçün ziyarət edin www.datanumen.com