How to Copy ActiveX Controls

Hi, I'm the kind of person that would like to figure out things myself, some call it stubborn. That, mixed in with my ignorance got me where I'm now. I'm stuck and have to share this challenge with the group

I have a template sheet in my workbook from which I copy ranges of cells into other sheets by macros. One of the ranges in the template sheet has a calendar control in it and it is linked to the cell underneath. The macro selects the line with the 'Rows("7:7").Select' command. Using this command the calendar control is not copied though.

Is there a way to copy controls with the cells?

thanks much
Dutch

thanks for the fast reply.

and will this copy the control to the same column in the destination sheet?
Is the paste command like:
ActiveSheet.Shapes("Control Name").Paste