Erik -Deleting row cont.
Dan,
Change the 0 to a 1. You can't select column zero in the Cells property:
If Cells(RName,1).Value ="" Then
hth,
Doug Glancy
"Dan" wrote in message
...
Erik, thanks that worked with my If statements testin if
the input was greater than 6 and =6.
How would I test (If statement) if the first cell in (user
InputRow) "RName" row is blank? I had:
If Cells(RName,0).Value ="" Then
MsgBox "Row is blank"
but this errors w/message: Run-time error 1004:
Application defined or object-defined error.
-----Original Message-----
This should work:
Rows(RName).Delete
-Erik
"Dan" wrote in
message
...
I set up a InputBox to capture the ROW that the user
would
like to Delete, If Input = 6 then ClearContents of the
row, etc. I started like this:
Dim RName as Interger
RName=InputBox("Enter Row to be deleted", "Row Number")
How do I use the "RName" to select and delete the entire
row?
I used the RName like this:
If RName = 6 Then
|