ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   vba: isempty (https://www.excelbanter.com/excel-programming/282767-vba-isempty.html)

chick-racer[_37_]

vba: isempty
 

I'm wondering if the IsEmpty() checks the entire range that i'v
specified.? I am trying to generate a check for empty ranges wher
there should be data...here's what i have so far...
(checks every 11th row after the first one)

For J = 12 To 608
Set rng = Range("D" & J, "O" & J)
If IsEmpty(rng) = True Then
MsgBox "no values entered for analyte on line " & J
Exit Sub
Else
J = J + 10
End If
Next J

I just cannot get this to work, any suggestions?
thanks

-----------------------------------------------
~~ Message posted from http://www.ExcelTip.com
~~View and post usenet messages directly from http://www.ExcelForum.com


Ron de Bruin

isempty
 
Use something like this chick-racer

If Application.WorksheetFunction.CountA(rng) = 0 Then MsgBox "empty"

--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl



"chick-racer" wrote in message ...

I'm wondering if the IsEmpty() checks the entire range that i've
specified.? I am trying to generate a check for empty ranges where
there should be data...here's what i have so far...
(checks every 11th row after the first one)

For J = 12 To 608
Set rng = Range("D" & J, "O" & J)
If IsEmpty(rng) = True Then
MsgBox "no values entered for analyte on line " & J
Exit Sub
Else
J = J + 10
End If
Next J

I just cannot get this to work, any suggestions?
thanks!


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/




Vasant Nanavati

isempty
 
Ron has provided you with a solution.

To clarify, the confusingly-named IsEmpty has to do with whether or not a
variable has been initialized, and not with whether or not a range is empty.

--

Vasant

"chick-racer" wrote in message
...

I'm wondering if the IsEmpty() checks the entire range that i've
specified.? I am trying to generate a check for empty ranges where
there should be data...here's what i have so far...
(checks every 11th row after the first one)

For J = 12 To 608
Set rng = Range("D" & J, "O" & J)
If IsEmpty(rng) = True Then
MsgBox "no values entered for analyte on line " & J
Exit Sub
Else
J = J + 10
End If
Next J

I just cannot get this to work, any suggestions?
thanks!


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/




Bob Phillips[_6_]

isempty
 
Vasant,

Although Help says it works on variables, it also works on a single cell
range. For instance

?IsEmpty(Range("A1"))

returns True if A1 has no data, False if it does.

?IsEmpty(Range("A1:D1")

returns False whatever the contents.

I guess VBA converts the Range value into a temporary variable.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Vasant Nanavati" <vasantn *AT* aol *DOT* com wrote in message
...
Ron has provided you with a solution.

To clarify, the confusingly-named IsEmpty has to do with whether or not a
variable has been initialized, and not with whether or not a range is

empty.

--

Vasant

"chick-racer" wrote in message
...

I'm wondering if the IsEmpty() checks the entire range that i've
specified.? I am trying to generate a check for empty ranges where
there should be data...here's what i have so far...
(checks every 11th row after the first one)

For J = 12 To 608
Set rng = Range("D" & J, "O" & J)
If IsEmpty(rng) = True Then
MsgBox "no values entered for analyte on line " & J
Exit Sub
Else
J = J + 10
End If
Next J

I just cannot get this to work, any suggestions?
thanks!


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/







All times are GMT +1. The time now is 04:39 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com