Excel VBAでセルの内容と書式をクリアする方法


  1. 単一のセルの内容と書式をクリアする場合:
Sub ClearCell()
    Range("A1").ClearContents ' A1セルの内容をクリア
    Range("A1").ClearFormats ' A1セルの書式をクリア
End Sub
  1. 範囲内のセルの内容と書式をクリアする場合:
Sub ClearRange()
    Range("A1:B10").ClearContents ' A1からB10までのセルの内容をクリア
    Range("A1:B10").ClearFormats ' A1からB10までのセルの書式をクリア
End Sub
  1. シート全体のセルの内容と書式をクリアする場合:
Sub ClearSheet()
    Cells.ClearContents ' シート全体のセルの内容をクリア
    Cells.ClearFormats ' シート全体のセルの書式をクリア
End Sub
  1. 特定の条件に基づいてセルの内容と書式をクリアする場合:
Sub ClearConditional()
    Dim cell As Range
    For Each cell In Range("A1:B10")
        If cell.Value = "条件" Then ' 特定の条件に応じてセルをクリア
            cell.ClearContents
            cell.ClearFormats
        End If
    Next cell
End Sub

これらの例では、ClearContentsメソッドを使用してセルの内容をクリアし、ClearFormatsメソッドを使用してセルの書式をクリアしています。適切なメソッドを使用して、必要なセルの範囲を指定し、内容と書式をクリアすることができます。

以上がExcel VBAでセルの内容と書式をクリアする方法の例です。ご参考になれば幸いです。