hi i got a sheet which I copy and insert it at the end of the workbook problem is that I have a rectangle which I would like text to be inside however it changes names as soon as I copy it is there a way I could use like a variable to do what I want with the only shape on my sheet.

Sub Macro6()

    ActiveSheet.Shapes("Rectangle 1627").Select
    Selection.Characters.Text = "hello world. Its" & Now()
    End Sub