Excel VBA教程:CellFormat对象

Application
CellFormat
多个对象

表示单元格格式的搜索条件。

CellFormat对象的用法

使用 Application 的 FindFormat 或 ReplaceFormat属性可返回一个 CellFormat对象。

对于 CellFormat对象,可使用其BordersFontInterior属性为单元格格式定义搜索条件。下例为单元格内部格式设置搜索条件。在这个方案中,将单元格 A1 的内部设置为黄色,然后搜索到该单元格并且将其内部替换为绿色。


Sub ChangeCellFormat()
    ' Set the interior of cell A1 to yellow.
    Range("A1").Select
    Selection.Interior.ColorIndex = 36
    MsgBox "The cell format for cell A1 is a yellow interior."
    ' Set the CellFormat object to replace yellow with green.
    With Application
        .FindFormat.Interior.ColorIndex = 36
        .ReplaceFormat.Interior.ColorIndex = 35
    End With
    ' Find and replace cell A1's yellow interior with green.
    ActiveCell.Replace What:="", Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
        ReplaceFormat:=True
    MsgBox "The cell format for cell A1 is replaced with a green interior."
End Sub

上页:Excel VBA教程:CalloutFormat对象 下页:Excel VBA教程:Characters对象

Excel VBA教程:CellFormat对象

Excel VBA教程:Characters对象 Excel VBA教程:Chart对象
Excel VBA教程:ChartArea对象 Excel VBA教程:ChartColorFormat对象
Excel VBA教程:ChartFillFormat对象 Excel VBA教程:ChartGroup对象
Excel VBA教程:ChartGroups集合 Excel VBA教程:ChartObject对象
Excel VBA教程:ChartObjects集合对象 Excel VBA教程:Charts集合
Excel VBA教程:ChartTitle对象 Excel VBA教程:ColorFormat对象
Excel VBA教程:Comment对象 Excel VBA教程:Comments集合对象
Excel VBA教程:ConnectorFormat对象 Excel VBA教程:ControlFormat对象
Excel VBA教程:Corners对象 Excel VBA教程:CubeField对象
Excel VBA教程:CubeFields集合对象 Excel VBA教程:CustomProperties集合
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号