Free for PREMIUM members
[Okta Webinar] Learn how to a build a cloud-first strategyRegister Now
Dim cl As Range
Dim EmpTable As Range
Dim boolBlank As Boolean
Set EmpTable = Range("TestID")
'Check whether Range is having blank row inbetween throw message if row is blank inbetween
For Each cl In EmpTable
If IsEmpty(cl) Then
boolBlank = True
If boolBlank Then
MsgBox "There is an empty cell in this range."
MsgBox "There are no empty cells in this range."
Open in new window
Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.
We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!