指定範囲内のセルに情報が入っているか調べる
CountBlank関数を使って対象のレコードに情報が入っているか調べる
Sub AAA()
MsgBox WorksheetFunction.CountBlank(Range(Cells(1, 1), Cells(1, 8)))
End Sub
CountBlank関数を使って対象のレコードに情報が入っているか調べる
Sub AAA()
MsgBox WorksheetFunction.CountBlank(Range(Cells(1, 1), Cells(1, 8)))
End Sub