Please help
Hey everyone,
Im trying to loop through a column of values and if they equal to a certain
value, print the list of relevant values on a different sheet.
e.g. somthing along these lines
Dim number
Sheets("Info").Select
number = Range("B2").Select
Range("A2").Select
Do Until IsEmpty(ActiveCell)
If (ActiveCell = number) Then
Selection.Offset(0, 2).Copy
!-- then i want to copy in a different sheet this value and move to the next
value, then copy the next value into the other sheet and so on --!
End If
Loop
|