It isn't working, i put it on "Workbook" and "sheetactivate" and it gives
me some errors in VBA code in part:
Worksheets(sn).Cells(k, 1).Value = ""
Worksheets(sn).Cells(k, 2).Value = ""
It says "subscript out of range"...

I don't know if i explain me well, cos as i see ur assumptions and i don't
undearstand A1:B20.
Sorry but in VBA i'm completely newbie!!!
I think i explain better my idea in a new topic "Linked sheets", it is more
detailed the whole idea.
If u can not undearstand i could mail u if u don't mind, with an excell
table with more information, but i think this second Topic is more complete
and more clear.

Thanks again for all the help.