我們緻力于為大家奉獻最有效的經驗,讓大家能夠解決掉問題,但是大家也都知道,每個人遇到的情況都是不一樣的,大家在看經驗的同時,除了跟随操作,也需要自己的思考,舉一反三的解決問題,這樣才會變得更加有内涵,一起成長為一樣的經驗達人。根據二八定律,學好這excel VBA,就能完成80%的工作。
在VBA中可以對單元格的字體格式進行各種設置,如下面的代碼所示。
#001 Public Sub RngFont()
#002 With Range("A1").Font
#003 .Name = "華文彩雲"
#004 .FontStyle = "Bold"
#005 .Size = 18
#006 .ColorIndex = 3
#007 .Underline = 2
#008 End With
#009 End Sub
代碼解析:
RngFont過程對單元格A1的字體格式進行設置。
其中第3行代碼設置字體為“華文彩雲”,應用于Font對象的Name屬性返回或設置對象的名稱。
第4行代碼設置字體為加粗,FontStyle屬性返回或設置字體樣式。設置為“Bold” 加粗字體,設置為“Italic”傾斜字體,也可以設置成“Bold Italic”。
第5行代碼設置字體的大小為18磅,Size屬性返回或設置字體大小。
第6行代碼設置字體的顔色為紅色,應用于Font對象的ColorIndex屬性返回或設置字體的顔色,該顔色可指定為當前調色闆中顔色的編号,如圖 11‑1所示。
調色闆中顔色的編号
第7行代碼設置字體為單下劃線類型,Underline屬性返回或設置應用于字體的下劃線類型,可為表格 11‑1所列的XlUnderlineStyle常量之一。
表格 XlUnderlineStyle常量
如果你在工作中還需要設計其他的表格模闆,都可以留言,我們會根據大家需求來整理相關的學習資料,目的隻有一個,那就是學好Excel,提高工作效率!
,更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!