Excel VBA教程:Font属性

应用于 CellFormat对象的 CellFormat属性。

返回一个Font对象,该对象允许用户设置或返回基于单元格字体格式的搜索条件。

expression Font

expression   必需。该表达式返回上面的对象之一。

应用于“应用于”列表中的其他所有对象的 Font属性。

返回一个Font对象,该对象代表指定对象的字体。

expression.Font

expression   必需。该表达式返回上面的对象之一。

Excel VBA教程:Font属性·示例

应用于 CellFormat对象的 Font属性。

本示例设置搜索条件以识别包含红色字体的单元格,应用该条件创建一个单元格,找到该单元格,并通知用户。


Sub SearchCellFormat()
    ' Set the search criteria for the font of the cell format.
    Application.FindFormat.Font.ColorIndex = 3
    ' Set the color index of the font for cell A5 to red.
    Range("A5").Font.ColorIndex = 3
    Range("A5").Formula = "Red font"
    Range("A1").Select
    MsgBox "Cell A5 has red font"
    ' Find the cells based on the search criteria.
    Cells.Find(What:="", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
        xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
        , SearchFormat:=True).Activate
    MsgBox "Microsoft Excel has found this cell matching the search criteria."
End Sub

应用于“应用于”列表中的其他所有对象。

本示例判断单元格 A1 的字体名称是否为 Arial,并通知用户。


Sub CheckFont()
    Range("A1").Select
    ' Determine if the font name for selected cell is Arial.
    If Range("A1").Font.Name = "Arial" Then
        MsgBox "The font name for this cell is 'Arial'"
    Else
        MsgBox "The font name for this cell is not 'Arial'"
    End If
End Sub

上页:Excel VBA教程:FolderSuffix属性 下页:Excel VBA教程:FontBold属性

Excel VBA教程:Font属性

Excel VBA教程:FontBold属性 Excel VBA教程:FontItalic属性
Excel VBA教程:FontName属性 Excel VBA教程:Fonts属性
Excel VBA教程:FontSize属性 Excel VBA教程:FontStyle属性
Excel VBA教程:FooterMargin属性 Excel VBA教程:ForeColor属性
Excel VBA教程:FormatConditions属性 Excel VBA教程:FormControlType属性
Excel VBA教程:Formula属性 Excel VBA教程:Formula1属性
Excel VBA教程:Formula2属性 Excel VBA教程:FormulaArray属性
Excel VBA教程:FormulaHidden属性 Excel VBA教程:FormulaLabel属性
Excel VBA教程:FormulaLocal属性 Excel VBA教程:FormulaR1C1属性
Excel VBA教程:FormulaR1C1Local属性 Excel VBA教程:Forward属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号