Using Excel 97 I get an debug error on all references to sheet10
Sheet10 has not been setto relate to any worksheet
try
dim Sheet10 as worksheet
set sheet10 = sheets("sheet10")
or
set sheet10 = workbooks("name").sheets("sheet10")
or
change sheet10.
to
sheets("sheet10")
--
Message posted from
http://www.ExcelForum.com