How do I select a range of cells without doing Range("a3", "f3")..

[Guest]

Hi, does anyone know how to select a range of cells without using exact
references?

Basically what I want to do is

If a20 = blank or zero, I want to delete cells in that row from a to f
(then I will test the next cell)

(Selection.Delete Shift:=xlUp)

 

[Trevor Shuttleworth]

Miriam

something like:

Range(Activecell,Activecell.Offset(0,5)).Select

You might want to check that the Active cell is in Column A

You don't need to select the cells though:

Range(Activecell,Activecell.Offset(0,5)).Delete Shift:=xlUp

Regards

Trevor

 

[Bob Phillips]

Do
If Range("A20").Value = 0 Or Range("A20").Value = "" Then
Range("A20:F20").Delete Shift:=xlUp
End If
Loop Until Range("A20").Value <> 0 And Range("A20").Value <> ""

--

HTH

RP
(remove nothere from the email address if mailing direct)