Copying data between two different workbooks

[secoo140]

hello,

I'm trying to copy the text box inside my page.

The code I used didn't work
can you help me
Thank you

name of the textbox is "oyku"

Sub oyku()
'
'
    Windows("1.xlsm").Activate
    Sheets("Kimlik").Select
    Sheets("Kimlik").oyku.Copy
    Windows("2.xlsm").Activate
    Sheets("Kimlik").Select
    Sheets("Kimlik").oyku.Paste
    
    'trim için deniyorum
    


End Sub

 

[igold]

How about this:

Sub oyku()
    
    Workbooks("1.xlsm").Activate
    Worksheets("Kimlik").Shapes("oyku").Copy
    Workbooks("2.xlsm").Activate
    Worksheets("Kimlik").Paste
    
End Sub