Good afternoon Neb

This should certainly be possible. Put this line before the sort
routine:

ActiveSheet.Unprotect Password:="DSKM"

and this line after the sort routine:

ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True, Password:="DSKM"

HTH

DominicB


--
dominicb
------------------------------------------------------------------------
dominicb's Profile: http://www.excelforum.com/member.php...o&userid=18932
View this thread: http://www.excelforum.com/showthread...hreadid=388414