Well, I didn't see where Cell1 and cell2 were initialized as cells, or ranges, so I am not certain you are constructing the object correctly.
You might need to (edit)DECLARE
cell1 and cell2 as ranges, as in:
dim cell1 as RANGE
It's kind of fun to do the impossible! -Walter Elias Disney