Hi all:

I'm trying to find the easiest way to programatically copy a named range
in one workbook (normally unopened) into a corresponding target range in my
open workbook. This is part of a conversion from Lotus 1-2-3 to Excel. In
1-2-3, the command RangeCombine, as part of the Range object in LotusScript,
handled the task of opening the specified worksheet, locating the named
range therein, and then copying that range to the range specified in the
Range Object associated with the RangeCombine command. For example:

lrMyDestinationRange.RangeCombine lcFromFilePathAndName, , , ,
$CombineReplace, "PNAME"

whe
- lrMyDestinationRange is the Range object into which the new values
will be placed,
- lcFromFilePathAndName is a string value holding what its name
implies,
- $CombineReplace is a LotusScript-specific value indicating that
the new data should Replace any existing values,
- "PNAME" is the name of the range in the external worksheet.

Does anyone have any good, quick, easy ideas on how this same type of
thing can be implemented in Excel VBA?

Any and all help will be GREATLY appreciated!

Thanks,

Jon

Ron has several examples of copying at this site. scroll down the menu to
find your topic.

http://www.rondebruin.nl/tips.htm

"JonWestcot" wrote:

Hi all:

I'm trying to find the easiest way to programatically copy a named range
in one workbook (normally unopened) into a corresponding target range in my
open workbook. This is part of a conversion from Lotus 1-2-3 to Excel. In
1-2-3, the command RangeCombine, as part of the Range object in LotusScript,
handled the task of opening the specified worksheet, locating the named
range therein, and then copying that range to the range specified in the
Range Object associated with the RangeCombine command. For example:

lrMyDestinationRange.RangeCombine lcFromFilePathAndName, , , ,
$CombineReplace, "PNAME"

whe
- lrMyDestinationRange is the Range object into which the new values
will be placed,
- lcFromFilePathAndName is a string value holding what its name
implies,
- $CombineReplace is a LotusScript-specific value indicating that
the new data should Replace any existing values,
- "PNAME" is the name of the range in the external worksheet.

Does anyone have any good, quick, easy ideas on how this same type of
thing can be implemented in Excel VBA?

Any and all help will be GREATLY appreciated!

Thanks,

Jon

Does this help?

Workbooks("source").Sheets("Sheet1").Range("nrange ").copy

"source would be the workbook you are looking to get the info from,
nrange would be the name of your named range, this assumes the workbook
is open.


--
The Code Cage Team

Regards,
The Code Cage Team
http://www.thecodecage.com
------------------------------------------------------------------------
The Code Cage Team's Profile: http://www.thecodecage.com/forumz/member.php?userid=2
View this thread: http://www.thecodecage.com/forumz/sh...ad.php?t=30446

Hi:

Thanks for the reply. I'm trying to do this, though, in one workbook
that is open and pulling the information from another workbook that is NOT
open.

I'll keep your sample in mind, though; never know when it will come in
handy.

Thanks again!

Jon

Does this help?

Workbooks("source").Sheets("Sheet1").Range("nrange ").copy

"source would be the workbook you are looking to get the info from,
nrange would be the name of your named range, this assumes the workbook
is open.

Hi JLGWhiz:

Thanks for the link. I'll go check it out.

Jon

Ron has several examples of copying at this site. scroll down the menu to
find your topic.

http://www.rondebruin.nl/tips.htm