Copy sheet1.range("A3:G5000") from an open file

's Computer Specifications

Good morning everyone,

Is there a way I can copy the above mentioned range from a file
already opened by a user and therefore marked as read-only to another
file named Recap for example?

Thank you for your time

Denys

's Computer Specifications

ActiveWorkbook.Sheets("Sheet1").Range("A3:G5000").Copy _
Workbooks("Recap.xls").Worksheets("Sheet1").Range("A1")

Assuming the file opened by the user is the active workbook.

Tim

"Denys" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
> Good morning everyone,
>
> Is there a way I can copy the above mentioned range from a file
> already opened by a user and therefore marked as read-only to another
> file named Recap for example?
>
> Thank you for your time
>
> Denys
>

Thread Tools
Show Printable Version Email this Page
Rate This Thread
Rate This Thread:

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Sheets("sheet1").Copy	Little Penny	Microsoft Excel Programming	5	18th Sep 2007 01:51 AM
if any range on sheet2 change put "a" in sheet1 cell a111	=?Utf-8?B?cHN3YW5pZQ==?=	Microsoft Excel Programming	2	12th Aug 2007 06:50 AM
use variable in Workbooks("book1").Worksheets("sheet1").Range("a1"	=?Utf-8?B?THVj?=	Microsoft Excel Programming	2	28th Sep 2005 08:37 PM
Sheets("sheet1").Range command between workbooks	=?Utf-8?B?THVj?=	Microsoft Excel Programming	3	27th Sep 2005 01:03 PM
Range only works when Sheet Name is "Sheet1"	paul reed	Microsoft Excel Programming	4	14th Sep 2003 08:37 PM