Hi, I am having the following code with the cells.find like this:[vba]Set Source1 = Cells.Find(What:=("Team1"), After:=ActiveCell, LookIn:= _
xlValues, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:= _
xlNext, MatchCase:=False, SearchFormat:=False)[/vba]
Team1 is one of the 30 teams I have, the problem is, I have to do it 30 timesbut the rest of code is the same. so I am thinking, if I can make a name list in a sheet and turn the code into something like:
[vba]for i=0 to 29
Set Source1 = Cells.Find(sheets(1).cells(1,1)..offset(i,0).value), After:=ActiveCell, LookIn:= _
xlValues, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:= _
xlNext, MatchCase:=False, SearchFormat:=False) ...[/vba]
but somehow there is always an error message, so does anyone knows how to express it, so that the value of a cell in a sheet will be searched?
thanks