Dear Mandeep brother,thanks alot.Its perfect.
On Tue, Dec 2, 2014 at 5:14 PM, Mandeep Baluja wrote:
> PFA !!!
>
>
> Sub MovedRange()
>
> Dim WKB1 As Workbook
> Dim WKB2 As Workbook
> Dim NM As Name
>
> Set WKB1 = Workbooks("AAA.xls") 'change the source workbook name
> accordingly
PFA !!!
Sub MovedRange()
Dim WKB1 As Workbook
Dim WKB2 As Workbook
Dim NM As Name
Set WKB1 = Workbooks("AAA.xls") 'change the source workbook name
accordingly
Set WKB2 = Workbooks("BBB.xls") 'change the destination workbook name
accordingly
For Each NM In W
Sub copysheet2()
ActiveSheet.Range(Range_name).Copy
Sheets(NewsheetName).Range("A1").PasteSpecial
End Sub
Regards,
Mandeep Baluja
Excel Specialist.
https://www.linkedin.com/profile/view?id=312532939
https://www.facebook.com/VBAEXCELSQL?ref=hl
On Tuesday, December 2, 2014 1:01:46 PM UTC+5:30,