Create if partial match then copy and paste data from one cell to another
theaxemonkey wrote:
Hopefully, I can explain this well which is probably half the
challenge. What I am trying to accomplish is a bit complicated.
For the purpose of simplicity
This is "simplicity"?
[snip]
This is what happens if working right
look at cell A3 (!feed) sheet = "New York Jets" then search (!scores)
sheet Column B and Column D by row, finds "NY JET" as match in cell D8,
if cell E8 is blank then copies cell H3 (!feed) sheet, and paste to cell
E8 (!scores), if cell is not blank continues search until blank cell to
the right of matching cell is found. Once this is done it moves on to
the next row.
look at cell A4 (!feed)= "New England Patriots" then search (!scores)
sheet Column B and Column D by row, finds "NEW ENGLAND" as match in cell
B8, if cell C8 is blank then copies cell H4 (!feed) sheet, and paste to
cell C8 (!scores)
The only suggestion I have at the moment is to build a Collection:
Dim Teams As Collection
Set Teams = New Collection
' scores sheet feed sheet
Teams.Add "NY JETS", "New York Jets"
Teams.Add "NEW ENGLAND", "New England Patriots"
'etc.
Then, when your code finds a match from the feed, it can get the info it
needs to find on the scores sheet like this:
infoToFind$ = Teams.Item("New York Jets")
This probably won't magically solve all your problems, but it *might* help.
--
It's a small world, but I wouldn't want to have to paint it.
-- Steven Wright
|