Copy workbook tab and macro changing for new tab

[MarcLewis]

Evening All,

I currently have a workbook with a Tab called Cam 1, I can copy this tab and the Macros are copied as well but i would rename the copied tabs to Cam 2, Cam 3 etc.
my question is can the macros alter / is there a line of code that can make it so the macro only changes the copied tab and not the original.

Unfortunatley my workbook is to big to upload, however below is the code for my macro.

Sub Ceiling()
'
' J Macro
'

'
    Sheets("Ref").Select
    ActiveSheet.Shapes.Range(Array("Ceiling")).Select
    Selection.Copy
    Sheets("Cam 1").Select
    Range("L7:P16").Select
    ActiveSheet.Paste
    Selection.ShapeRange.IncrementLeft 0.75
    Range("Q5").Select
End Sub

Any help would be greatly appriciated.

In addition is there a line of code i can put in so if there is already an image in the cell it will delete prior to inserting the new one.

Many Thanks