thanks!!! I just got it working using

For Each SH In ActiveWorkbook.Worksheets
SH.Activate
my code
Next

thanks a lot;)


--
halem2
------------------------------------------------------------------------
halem2's Profile: http://www.excelforum.com/member.php...fo&userid=9930
View this thread: http://www.excelforum.com/showthread...hreadid=557473