3 วิธีด่วนในการเปลี่ยนรูปแบบของอักษรตัวแรกของคำเฉพาะในเอกสาร Word ของคุณ

โซลูชั่น Word September 28, 2025

ในบทความนี้เราขอนำเสนอ 3 วิธีในการเปลี่ยนรูปแบบของอักษรตัวแรกของคำเฉพาะในเอกสาร Word ของคุณ

หนึ่งในกฎทั่วไปของการจัดรูปแบบเอกสารคือการใช้อักษรตัวแรกของแต่ละประโยคเป็นตัวพิมพ์ใหญ่ แต่ในกรณีพิเศษบางอย่างเช่นการทำงานกับเอกสารทางศิลปะมีข้อกำหนดเฉพาะที่เราต้องปฏิบัติตาม

และในบทความนี้ เราจะแสดงให้คุณเห็น 3 วิธีในการเปลี่ยนรูปแบบตัวอักษรตัวแรกของคำตามความต้องการที่แตกต่างกัน 3 แบบ

วิธีที่ 1: เปลี่ยนรูปแบบของอักษรตัวแรกของแต่ละคำในเอกสาร

อันดับแรก ให้กด “Alt+F11” เพื่อเรียกใช้โปรแกรมแก้ไข VBA ใน Word
จากนั้นคลิก "ปกติ" ที่คอลัมน์ด้านซ้าย
ถัดไปบนแถบเมนูคลิก "แทรก"
แล้วคลิก“ โมดูล” ในเมนูแบบเลื่อนลง
ตอนนี้ดับเบิลคลิกที่โมดูลใหม่เพื่อเปิดและวางรหัสต่อไปนี้:

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
```

บรรทัดนี้กำหนดอักษรตัวแรกเป็นตัวหนา คุณสามารถเปลี่ยน“ True” เป็น“ False” ได้หากไม่ต้องการ

```
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

ดูภาพหน้าจอ:

แนวทางที่ดีที่สุดในการจัดการข้อมูลสูญหาย

อาจเป็นเรื่องเครียดมากที่ข้อมูลสูญหายขั้นวิกฤต ดังนั้นคุณต้องรู้วิธีรับมือกับภัยดังกล่าว และแน่นอนทางออกที่ดีที่สุดของคุณคือการใช้ไฟล์ ซ่อมเอกสาร ยูทิลิตี้ ด้วยวิธีนี้คุณจะได้รับข้อมูลของคุณกลับมาโดยใช้เวลาน้อยที่สุด

บทนำผู้เขียน:

Vera Chen เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ ซ่อมแซม Excel และ pdf ซ่อมแซมผลิตภัณฑ์ซอฟต์แวร์ ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.