求一个宏,能一键设置excel选定的单元格(或表页)的中文为宋体,英文和数字为ArialNarrow,默认字体大小为10号。谢谢!...
求一个宏,能一键设置excel选定的单元格(或表页)的中文为宋体,英文和数字为Arial Narrow, 默认字体大小为10号。谢谢!
此题无解,条件格式无法改变字体、字号,本来以为下面的代码满足你的要求:
Sub Macro1()
Range("A1:Y161").Select
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
Formula1:="=""(此项空白)"""
With Selection.FormatConditions(1).Font
.Name = "楷体"
.Size = 8
End With
End Sub
结果系统提示无法改变字体、字号。
如果数据不太多,可以自己监控数据变化,例如:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim C As Range
For Each C In Target
If C.Value = "(此项空白)" Then
C.Font.Name = "楷体"
C.Font.Size = 8
End If
Next C
End Sub