none
Why I lose copy whrn I paste in owned sheet have a userform RRS feed

  • Question

  • Dear brothers 

    I creat userform in my sheet 

    The problem is when I copy from another sheet to my Owen sheet that userform showen 

    I lose copy and I don't found any copy cells in my clipboard to paste 

    Thanks to help me 

    Tuesday, November 13, 2018 6:46 PM

All replies

  • Hi Mohamed,

    Do you want to achieve it using VBA code? If so, please try code as below:<o:p></o:p>

    Sub copytodiffwb()
    Dim wbTarget            As Workbook 'workbook where the data is to be pasted
    Dim wbThis              As Workbook 'workbook from where the data is to copied
    Application.DisplayAlerts = False
    Application.ScreenUpdating = False
    Set wbThis = ActiveWorkbook
    Set wbTarget = Workbooks.Open("WORKBOOK TO COPY TO FULL ADDRESS")
    wbThis.Activate
    Application.CutCopyMode = False
    wbThis.Sheets("COPY FROM SHEET").Range("COPY FROM RANGE").Copy
    wbTarget.Sheets("COPY TO SHEET").Range("COPY TO RANGE").PasteSpecial Paste:=xlPasteValues
    wbTarget.Save
    wbTarget.Close
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
    End Sub
    

    For more information, please review the following link:

    Copy and Paste Data to another worksheet in Userform

    Hopefully it helps you.

    Best Regards,

    Yuki


    MSDN Community Support Please remember to click "Mark as Answer" the responses that resolved your issue, and to click "Unmark as Answer" if not. This can be beneficial to other community members reading this thread.

    Wednesday, November 14, 2018 2:34 AM
    Moderator
  • Hi Mohamed,

    Thanks for your asking. Did you resolve your issue? If the post helps you, you can mark it as answer and close the post.

    Thank you for understanding. If you have any question, or update, please feel free to let us know.

    I wish you a happy life!

    Best Regards,

    Yuki


    MSDN Community Support Please remember to click "Mark as Answer" the responses that resolved your issue, and to click "Unmark as Answer" if not. This can be beneficial to other community members reading this thread.

    Tuesday, November 20, 2018 7:22 AM
    Moderator