VBA Excel

ExcelExcel変数が数値かどうかを調べる

If IsNumeric(a) Then MsgBox "数値です"End If

Excelセルの結合を調べる

For Each c In Cells(1, 1).MergeArea If c.Address(0, 0) = "B2" Then MsgBox "結合されています" End If Next c

Excel値だけを消す

Sheet1.Range("A4:IV65536").ClearContents