• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Copy Paste Values

paulcherianc

paulcherianc

Member
Why is this macro replacing the formats on the Target Sheet? Any hints!

Code: 
Worksheets("SourceSheet").Activate
    Intersect(ActiveSheet.UsedRange, Columns("D")).Select
    Selection.Copy
    Sheets("TargetSheet").Range("J" & Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone
 
it's fine now. There was a statement Selection.clear on another macro which is running in parallel to this macro. Once when i made it Selection.ClearContents its working properly!
 
You must log in or register to reply here.
Back
Top