Find, Offset, Enter Number

[BUBBA]

I need some code that will go through an entire column and
find either of two names (Bob or Joe), go two columns over
(same row), and enter the number 9.

It would be nice if it could do this for all the
worksheets as the name appears in the same column in each
sheet.



TIA!

 

[Don Guillett]

something like this for the your range
for each ws in worksheets
ws.select ' test without this line first
for each c in range("b2:b200")
if ucase(c)="BOB" or ucase(c)="JOE" then c.offset(,2)=9
next
next

 

[Alan Beban]

This might get you started:

Range("A:A").Find("Joe", , , xlWhole).Offset(0, 2).Value = 9

Alan Beban