How to copy shape within specific range and paste to another workbook and extract text from shape

im new in n vba and require your help. Im working with a project right now but stuck in the middle. Two condition that need your support. 1. I have grouped shape in range c43:O63 and i want to select that shape, copy and paste it to another workbook at range A43:M63. 2. How to extract text from the shape and copy the text to selected cell

Thanks in advance

Set wb1 = ActiveWorkbook
Set sheet1 = wb1.Worksheets("Sheet1")
Set sheet2 = wb1.Worksheets("sheet2")
    For Each s In sheet2.Shapes
        s.Delete
    Next s

    For Each s In sheet1.Shapes
        s.Copy
        sheet2.Paste
    Next s

    For Each s In sheet2.Shapes
        s.Ungroup
    Next s