This works great -
If cll.Value = "R" And IsEmpty(cll.Offset(0, 2)) Then ....
I need the same statement, but "not empty" - been searching, but can't find
it!
Any help appreciated!
Conan Kelly - 24 Jan 2008 22:27 GMT
Theo,
how about Not IsEmpty?
If cll.Value = "R" And Not(IsEmpty(cll.Offset(0,2))) Then
HTH,
Conan
> This works great -
>
[quoted text clipped - 4 lines]
> it!
> Any help appreciated!
RB Smissaert - 24 Jan 2008 22:27 GMT
Try:
If cll.Value = "R" And Not IsEmpty(cll.Offset(0, 2)) Then
RBS
> This works great -
>
[quoted text clipped - 4 lines]
> it!
> Any help appreciated!
Jim Thomlinson - 24 Jan 2008 22:28 GMT
Soooo close... Try Not IsEmpty...
If cll.Value = "R" And Not(IsEmpty(cll.Offset(0, 2))) Then ....
I like adding in the extra quotes.

Signature
HTH...
Jim Thomlinson
> This works great -
>
[quoted text clipped - 3 lines]
> it!
> Any help appreciated!
Theo - 24 Jan 2008 22:34 GMT
That did the trick!
Thank you Jim
T
> Soooo close... Try Not IsEmpty...
>
[quoted text clipped - 9 lines]
> > it!
> > Any help appreciated!
Gord Dibben - 24 Jan 2008 23:18 GMT
Dim cll As Range
For Each cll In Selection
If cll.Value = "R" And Not IsEmpty(cll.Offset(0, 2)) Then
'do something
End If
Next
Gord Dibben MS Excel MVP
>This works great -
>
[quoted text clipped - 3 lines]
>it!
>Any help appreciated!