View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Jacob Skaria Jacob Skaria is offline
external usenet poster
 
Posts: 8,520
Default Name range down one cell

What's the error.If it is 1004 then check whether the name is correct.
Just try the below test

--Open a fresh workbook. Select cell C10. name it as 'myRange'
--Try the below code. and then fill C11 with data and try the below code ..

Sub Macro()
If Trim(Range("myRange").Offset(1)) = "" Then MsgBox "cell blank"
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"tpeter" wrote:

Jacob,

Thank you for your help. When I attempt to run it, it will still not work
(getting error). I am attempting to look at the cell below range "Plt_1001"
and if it is blank then bring up a user form to insert rows, if it is not
blank delete all but one row ("Plt_1001"). Everything works except for my
ability to refer to the cell below the named range ( c:w). I hope this
clarifies a little better than before. I have to refer to the name range
because there may be 1000 rows above it or 5 this is a variable.

"Jacob Skaria" wrote:

Try the below

If Range("Plt_1001").Offset(1) = "" Then
MsgBox "cell blank"
End If

If this post helps click Yes
---------------
Jacob Skaria


"tpeter" wrote:

I am building an if statement to check and see if the cell under Plt_1001
name range is blank. How do you refer to this? Thank you for your help again.


Private Sub UserForm_Activate()
Range("Plt_1001").Select
If Range("Plt_1001") -1.value = "" Then ' Doesn't work
Range("Plt_1001").Select
Else
Call Plant_1001
End If
End Sub