If names start from cell A1
then

for i=1 to range("A1").end(xldown).rows
range("B1")=range("A" & i)
' do other things
next i

"George Hill" wrote in message
...
I have a range of people's first names in a column, say Column A. I am
after
a script that takes the first name of the list and puts it into a certain
cell, say B1 (I need that so that some conditional formatting can take
place
somewhere else) and then executes a print command (I want to print a range
that the conditional formating was applied to). Then it needs to put the
second name in B1, print. Third name into B1, print ...

I am pretty much stuck at the looping bit as my VB knowledge is very
limited
(but I am good at recording macros (-: )

Any help would be much appreciated.