Sorry not to have responded to this one sooner, but it was caught in myISP's s-p-a-m filter for some reason.Your problem is that your Range references all need to be in quotes,e.g. Range("A1")