怎样在EXCEL中，怎样设置中文默认是一种字体，英文默认是另一种字体？

george_guo

在EXCEL中，怎样设置中文默认是一种字体，英文默认是另一种字体？

axiang117

office系列的默认字体是等线（Arial），可以在HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\FontLink\SystemLink添加Arial对应的项，就可以更改默认字体了，比如改成雅黑

louiszoom

If LenB(rng) - Len(rng) <> 0 Then 是判断是否有中文

louiszoom

只能实现单元格是中文或英文
你可以先默认一种字体，然后用下写的代码把所以英文改成另一种
========
Sub 按钮1_Click()
Dim hhh
Dim sss
For hhh = 1 To 30
For sss = 1 To 10
rng = Cells(hhh, sss).Text
    If LenB(rng) - Len(rng) <> 0 Then
Cells(hhh, sss).Select
    With Selection.Font
        .Name = "Arial"
        .Size = 11
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ThemeColor = xlThemeColorLight1
        .TintAndShade = 0
        .ThemeFont = xlThemeFontNone
    End With
End If
Next
Next
End Sub
=======