Wednesday 12 November 2014

Simple Cut paste with UsedRange method

Sub CutMove_Click()

Worksheets(1).Activate

ActiveSheet.UsedRange.Cut

Worksheets(2).Activate

ActiveSheet.Paste

End Sub
Posted by at

No comments:

Post a Comment

Subscribe to: Post Comments (Atom)