VBAのCellFormatオブジェクト

CellFormatオブジェクト

CellFormatオブジェクトについての解説になります。

CellFormatオブジェクトとは

CellFormatオブジェクトは、セルの書式の検索条件を表します。

CellFormat オブジェクトを取得するには、Application オブジェクトの FindFormat プロパティ、または ReplaceFormat プロパティを使用します。CellFormat オブジェクトでセルの書式の検索条件を定義するには、このオブジェクトの Borders プロパティ、Font プロパティ、または Interior プロパティを使用します。次の使用例は、セルの内部の書式を検索条件として設定します。この例では、セル A1 の内部の色を黄色に設定したうえで、検索と置換を行って、その色を緑色に変換します。


Sub ChangeCellFormat()

    ' セル A1 の内部の色を黄色に設定します。
    Range("A1").Select
    Selection.Interior.ColorIndex = 36
    MsgBox "セル A1 の内部の色は黄色に設定されています。"

    ' セルの内部の色を黄色から緑色に置換するように設定します。
    With Application
        .FindFormat.Interior.ColorIndex = 36
        .ReplaceFormat.Interior.ColorIndex = 35
    End With

    ' セル A1 の内部の色を検索し、緑色に置換します。
    ActiveCell.Replace What:="", Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
        ReplaceFormat:=True
    MsgBox "セル A1 の内部の色は緑色に置換されました。"

End Sub

※ドラッグ(スワイプ)すると全体を確認できます。