One way would be to use a for/each loop
for each c in range("b2:b200")
if len(c)1 then c.offset(0,-1).value=cell(1,1)
next

--
Don Guillett
SalesAid Software

"Geographer" wrote in message
...
This should be a simple question for you programmers out there.
I have more than 100 spreadsheats all with the same structure so if I can
write a macro it will save me lots of repetitive action.
I need to fill in a column with the value which is always contained in
cell
A1. If there are values in column B then fill in adjacent cell in column A
with the value named in cell A1.
In other words, if cell A1 ="Detroit" and there are some/any values in
column B, then fill in the cells in column A as "Detroit". Some
spreadsheats
have 5 rows to be filled in and some have 100 rows to be filled in.

I have tried several different times using a book I bought at Barnes &
Nobles, but I am having a hard time implementing a solution.

Thanks