在電腦時(shí)代，手寫字體雖然越來越被電子字體所取代，但有時(shí)我們還是希望能夠打印出手寫效果的文字。本文將介紹如何使用Word打印出以假亂真的手寫效果。 準(zhǔn)備工作 在開始操作之前，您需要準(zhǔn)備以下材料：

在電腦時(shí)代，手寫字體雖然越來越被電子字體所取代，但有時(shí)我們還是希望能夠打印出手寫效果的文字。本文將介紹如何使用Word打印出以假亂真的手寫效果。

準(zhǔn)備工作

在開始操作之前，您需要準(zhǔn)備以下材料：

• 一臺安裝有Microsoft Word 2010的電腦
• 一篇待打印的文章

修改宏設(shè)置

首先，我們需要修改一下Word的宏設(shè)置，以便打印出手寫效果。請按照以下步驟進(jìn)行操作：

1. 打開Microsoft Word 2010
2. 點(diǎn)擊頂部菜單欄中的“文件”選項(xiàng)
3. 選擇“選項(xiàng)”
4. 在彈出的選項(xiàng)窗口中，選擇“自定義功能區(qū)”
5. 在右側(cè)的“主選項(xiàng)卡”中，勾選“開發(fā)人員”
6. 點(diǎn)擊“確定”保存設(shè)置

創(chuàng)建宏代碼

接下來，我們需要創(chuàng)建一個(gè)產(chǎn)生手寫效果的宏代碼。請按照以下步驟進(jìn)行操作：

1. 點(diǎn)擊頂部菜單欄的“開發(fā)人員”選項(xiàng)卡
2. 點(diǎn)擊“宏”按鈕
3. 在打開的宏編輯器中，輸入以下代碼：

Sub RandVBA()
    39;四號與三號間之間可以取的值：14 14.5 15 15.5 16
    Dim R_Character As Range
    Dim myFontSize As Single
      False
    For Each R_Character In 
        VBA.Randomize
        myFontSize  Choose(Int(VBA.Rnd * 5)   1, "14", "14.5", "15", "15.5", "16")
        R_  myFontSize
        39;位置，同理自己改
        R_  Int(VBA.Rnd * 5)   1
        39;字間距，同理自己改
        R_  Int(VBA.Rnd * 5)   1
    Next
      True
End Sub

運(yùn)行宏并打印手寫效果

完成以上步驟后，我們就可以利用剛剛創(chuàng)建的宏，產(chǎn)生手寫效果了。請按照以下步驟進(jìn)行操作：

1. 在Word文檔中錄入您想要打印的內(nèi)容
2. 點(diǎn)擊頂部菜單欄的“開發(fā)人員”選項(xiàng)卡
3. 點(diǎn)擊“宏”按鈕
4. 選擇剛剛創(chuàng)建的宏“RandVBA”
5. 點(diǎn)擊“運(yùn)行”按鈕

現(xiàn)在，您可以通過打印預(yù)覽或直接打印功能查看并打印出以假亂真的手寫效果了！如果您覺得生成的效果還不夠潦草，可以根據(jù)自己的喜好修改宏代碼中的參數(shù)，如字體大小范圍和位置高低范圍，以達(dá)到更加逼真的效果。