G
Guest
sub rotate()
dim i, x as integer
x = 1
do until sheets("Calc").cells(x,1) = ""
i = 1
do until sheets("Calc").cells(i,2) = sheets("Calc").cells(x,1)
i = i + 1
loop
x = x + 1
loop
end sub
Basically, I want to check one list with another, or similar, and I
generally want to look down a column of values until I get the specific line
that the value is copied.
Also, if I hit a blank cell I'll want to stop.
Imagine that column A is a collection of jobs, I want to put them in column
B, but want to remove the duplicates. So what i'm doing is going down A,
wanting to find where the duplicate in B is, and if its not there, to add it
to the bottom. So I really want to loop until the value matches, OR it hits a
blank cell...
dim i, x as integer
x = 1
do until sheets("Calc").cells(x,1) = ""
i = 1
do until sheets("Calc").cells(i,2) = sheets("Calc").cells(x,1)
i = i + 1
loop
x = x + 1
loop
end sub
Basically, I want to check one list with another, or similar, and I
generally want to look down a column of values until I get the specific line
that the value is copied.
Also, if I hit a blank cell I'll want to stop.
Imagine that column A is a collection of jobs, I want to put them in column
B, but want to remove the duplicates. So what i'm doing is going down A,
wanting to find where the duplicate in B is, and if its not there, to add it
to the bottom. So I really want to loop until the value matches, OR it hits a
blank cell...