Try this Kamal

Dim wb As Workbook
Range("A1:T50").Copy
Set wb = Workbooks.Add(1)
wb.Sheets(1).Pictures.Paste(Link:=True).Select
Application.CutCopyMode = False


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Kamal" wrote in message ...
I am preparing a report using macro . I want to copy that one page report to
a new file as a picture link.

Can some one help me in writing a macro to copy - say range A1 : T50 - from
one file and paste it to a new file as picture link?

Thanks