Loopy over a loop that works (please help)
Posted by keith on February 16, 2002 4:18 AM
I have a loop that copies a range from one sheet to another until the bottom of the range.
All well and good, but I want it to only pick the row if the cell value is = to "c" or "C", ignore every thing else.
I can't see the wood for the trees
can you help?
as it stand now the rooutine will copy and paste all. The line where I am having trouble is the active cell line.
i = 15
' To select condition c in column e then place in
' sheet cmr at A15
For Each X In Range("E15", Range("E16").End(xlDown))
If X = "" Then Exit For
' If ActiveCell.Value <> "c" Then GoTo nextrow
Range("A" & i).Select
Range("A" & i & ":H" & i).Select
Range("A2000").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlValues
nextrow: i = Selection.Row + 1
' End If