二維碼 購物車
部落窩在線教育歡迎您!

如何批量調整文本框中的文字字體為“宋體”?

?

作者:小蝦來源:部落窩教育發(fā)布時間:2021-07-21 09:52:06點擊:6170

分享到:
0
收藏    收藏人氣:0人
版權說明: 原創(chuàng)作品,禁止轉載。

編按:

文本框,想必大家都不陌生,它是承載文字的工具。有了它,我們可以對文字進行自由的排版和合理的布局,快速傳遞信息。但是,在設置多個文本框中的字體格式時,不知道各位有沒有發(fā)現,它無法像選擇普通文本那樣直接按【Ctrl+A】鍵全選文本框。而是需要按住【Ctrl】鍵不放,逐一選擇文本框,然后進行設置,這樣做就非常耗時費力。那么,有快捷操作方法嗎?今天小編教大家2招,一起來看一看吧!



你還記得自己第一次加班是因為什么事情嗎? 

反正我印象中第一次加班是因為修改Word文檔中所有文本框中的字體格式! 

那是一個星期五下午,臨近下班,老板突然發(fā)給我一個文檔,讓我把文檔中所有文本框中的字體改一下。

打開文檔一看,好家伙!數不清的文本框……

 

 

 

只能硬著頭皮一個一個地改,真的是苦不堪言!

經過這件事后,我下定決心,一定要找到更快捷的處理方法。

后來,經過一段時間的摸索,我總結了2個快速處理技巧。為避免各位也遇到相同問題而導致加班,今天我就將方法分享出來,希望各位都能“到點下班”!

 

方法一:選擇格式相似的文本

 

如果文檔中所有文本框中的字體格式都相同,可先選中任意一個文本框,然后點擊【開始】-【編輯】-【選擇】-【選擇所有格式相似的文本】。

此時,我們可以看到所有文本框中的文本都被同時選中了。然后在【開始】-【字體】組中設置字體為“宋體”即可。


 

方法二:使用VBA

打開VBA編輯器(可直接按【Alt+F11】組合鍵),新建模塊,然后將下面的代碼復制粘貼到窗口中。

Sub 將所有文本框中的文字字體設置為宋體()

   Dim oShp As Shape

   For Each oShp In ActiveDocument.Shapes

     oShp.TextFrame.TextRange.Font.Name = “宋體”

   Next oShp

End Sub


然后保存宏,再點擊【運行】
-【運行子過程/用戶窗體】,運行宏。

最后,關閉VBA窗口,此時,即可看到文檔中所有文本框中的文字字體就變?yōu)樗误w了。



tips點擊【視圖】-【宏】-【查看宏】-【運行】,也可運行宏喲!

好了,今天的內容就到這里,比較簡單卻非常實用的小技巧,你都掌握了嗎?

 

Word學習交流請加QQ群:816626786

做Word大神,快速提升工作效率,部落窩教育Word極速貫通班》播課全心為你!

掃下方二維碼關注公眾號,可隨時隨地學習Word



相關推薦:

Word表格插入圖片后,word圖片自動適應表格技巧!

提高工作效率!這招Word批量處理技巧你可要記牢

Word快速錄入技巧匯總:數字大小寫、轉繁體字、打生僻字、分數、上下標輸入
為什么你的Word文檔排版凌亂?因為你不會用這3招呀!

版權申明:

本文作小蝦;同時部落窩教育享有專有使用權。若需轉載請聯系部落窩教育。