• 未設置時：

• 用代碼設置後：

• 未設置時：

• 用代碼設置後邊框後：

• 用代碼設置尺寸後：

• 私信回複 代碼助手即可下載 VBA代碼助手專業版
• 使用代碼助手後，輸入中文：單元格 空格 即可顯示代碼，方便快速輸入代碼

• 還可以收藏自己需要的代碼，方便下次使用。

• 使用錄制宏方法得到基礎代碼：

• 停止錄制後得到以下代碼：

• 注釋：
• Name: 字體名稱
• FontStyle: 字體樣式
• Size: 字号
• Strikethrough: 文字中間是否有水平删除線
• Superscript: 是否上标字符
• Subscript: 是否下标字符
• OutlineFont : 是否空心字體
• Shadow: 是否有陰影(如果指定的字體是陰影字體)
• Underline: 下劃線類型

• Color: 字體顔色

• Bold: 字體是否加粗
• TintAndShade: 字體顔色變深或變淺
• ThemeFont: 主題字體
• 去掉未設置的屬性，代碼如下：
• With Sheet6.Range("B5").Font 'Sheet6 工作表 B5 單元格 字體設置
• .Name = "微軟雅黑" ‘字體名稱
• .Size = 16 '字體大小
• .Underline = xlUnderlineStyleSingle '單下劃線
• .Color = -10477568 '字體顔色
• .Bold = True '加粗
• End With
• With: 開始對輸入的對象執行這之後的代碼
• 示例中為對 Sheet6 工作表-B5 單元格-字體 進行設置
• 中間代碼前面加上 . 代表都使用: Sheet6 工作表-B5 單元格-字體
• End With：執行結束

• 設置前：

• 設置後：

• 3. 單元格内部顔色填充
• 錄制宏以後得到以下代碼:

• 注釋:
• Pattern: 内部圖案
• PatternThemeColor: 圖案的主題顔色
• Color: 主要顔色
• TintAndShade: 使顔色變深或變淺
• PatternTintAndShade: 淡色和底紋圖案
• 修改後代碼:
• With Sheet6.Range("B5").Interior 'Sheet6 工作表 B5 單元格 單元格内部格式
• .Pattern = xlVertical '單元格内部圖案
• .PatternThemeColor = xlThemeColorAccent3 '單元格圖案的主題顔色
• .Color = 49407 '單元格顔色
• End With
• 設置前:

• 設置後:

• Interior單元格内部格式 PatternColorIndex: 設置内部圖案的顔色:
• 可指定為下圖的當前調色闆中顔色的編号:

• xlColorIndexAutomatic （自動填充）、 xlColorIndexNone （無内部填充）

• 錄制宏以後得到以下代碼:

• 注釋:
• Border: 設置邊框

• LineStyle: 邊框的線型
• TintAndShade: 使顔色變深或變淺
• Weight: 邊框的粗細
• Color: 以RGB值指定邊框的顔色
• ColorIndex: 設置邊框顔色
• ★★★注意: 指定Color參數可以設置顔色為當前調色闆之處的其它顔色，不能同時指定ColorIndex參數和Color參數。
• 修改代碼:

• 注釋:
• 使用單元格區域變量 和 顔色變量，方便後面快速改動。
• 設置前:

• 設置後:

• 5. 單元格的行高列寬
• 同樣用錄制的宏方法得到以下代碼：

• 注釋：
• View：設置在窗口中顯示的視圖

• RowHeight ：磅為單位 設置指定區域的行高
• ColumnWidth ：磅為單位 設置指定區域的列寬
• 修改代碼為：

• 設置後：

更詳細的講解請到我視頻專欄學習

更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!