I been attempting to set a variable range. In the following code I need to get rid of--->Set rng = Range([AS9], [AS9].End(xlDown))<--- and change it to work with the loop. In my worksheet ("AV" & i + 1) = row 9. I would like to set AS9 as the range.
Any suggestions?
Thanks,
Kurt
Dim c As Variant
Dim rng As Range
Dim i As Long
Sheets("sheet1").Select
i = Range("AS3").Row
While Cells(i, 45) <> "Week"
i = i + 1
Wend
ActiveSheet.Range("AV" & i + 1 & ":AV300").ClearContents
Set rng = Range([AS9], [AS9].End(xlDown))
For Each c In rng
Any suggestions?
Thanks,
Kurt
Dim c As Variant
Dim rng As Range
Dim i As Long
Sheets("sheet1").Select
i = Range("AS3").Row
While Cells(i, 45) <> "Week"
i = i + 1
Wend
ActiveSheet.Range("AV" & i + 1 & ":AV300").ClearContents
Set rng = Range([AS9], [AS9].End(xlDown))
For Each c In rng