Word的字型在同一篇文章中是否可以指定中英文的字型大小不同呢???

葉尼克 wrote:
小弟不知道有無其他更快速且聰明的辦法
僅提供一個笨笨的....

先將整頁打好
再利用手動調整好大小，例如樓主所說，中文14，英文12等..
一句或一段
然後利用Word當中的"複製格式"(像掃把那個)
先圈選該斷手動調整好的
接著選剩下的部份
這樣就會將剩下未手動調整的部份複製格式成希望設定的格式

好像還有方法
將格式設定好
再整篇打完後全選
再選格式應該也是相同的

以上小弟拙見 :p

chaorockson wrote:
我有想到一個方法...不過需要寫VB程式的能力才行...而且我沒有測試過...

利用上方功能列中 : 工具->巨集->Visual Basic編輯器
自己寫一個VB的程式，選取英文與數字，改變格式。
只要寫過一次，以後都可以用。
而且可以像您想要的一樣，在打完文件後點兩下就OK了！

這個方法我沒試過(不會寫VB啦...)
能否請大大提供語法範本, 我再自己行摸索學習, 謝謝...

uf4062tw wrote:
在輸入完文件後，按Alt+F11鍵，然後在左邊的專案上按"右鍵/插入模組"。
在右邊的視窗貼上程式碼後按F5即能將新細明體設成14字型大小，Times New Roman設成12字型大小/斜體。
程式碼如下：
Sub SetFontSize()
With Selection.Find
.ClearFormatting
.Font.NameFarEast = "新細明體"
.Text = ""
.MatchCase = False
.Wrap = wdFindContinue
.Replacement.ClearFormatting
.Replacement.Font.Size = 14
.Replacement.Text = ""
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.ClearFormatting
.Font.NameAscii = "Times New Roman"
.Replacement.Font.Size = 12
.Replacement.Font.Italic = True
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub