本文通过一个具体的VBA代码示例介绍了如何使用宏来设置Excel单元格的字体样式及清除工作表数据。示例展示了如何设定字体名称、大小、加粗、斜体以及颜色，并清空指定范围内的数据。
Public Sub 4_144()
Dim myRange As Range
Dim myFont As Font
Set myRange = Range("A1") '指定任意的单元格区域
Set myFont = myRange.Font
Cells.Clear '清除工作表数据
myRange.Value = "ExcelVBA实用技巧大全"
With myFont
.Name = "华文新魏"
.Size = 15
.Bold = True
.Italic = True
.ColorIndex = 3
End With
Set myFont = Nothing
Set myRange = Nothing
End Sub
Dim myRange As Range
Dim myFont As Font
Set myRange = Range("A1") '指定任意的单元格区域
Set myFont = myRange.Font
Cells.Clear '清除工作表数据
myRange.Value = "ExcelVBA实用技巧大全"
With myFont
.Name = "华文新魏"
.Size = 15
.Bold = True
.Italic = True
.ColorIndex = 3
End With
Set myFont = Nothing
Set myRange = Nothing
End Sub
扫一扫
1997
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
