PeaceJetのブログ

金融系の社内エンジニアをやりながら、マーケティングやプランナーなども

結合されたセルの値を消す方法【ExcelVBA・エクセルマクロ】

結合されたセルと、そうでないセルが
混在しているような場合、
値だけ消す方法をご紹介します。

ポイント

  • 結合したセルのプロパティは"MargeCells"
  • MargeCellsがTrueを返せば…する。
Sub CellClear()

    Target = Split("A1,B2,C3",",")
    
    For i = 0 to Ubound(Target)

    With .Range(Target)
             
        If .MergeCells Then
                 
            .MergeArea.ClearContents
                    
        Else
                
            .ClearContents
                    
        End If
               
    End With

    Next i

End Sub