CREATE MACRO TO COPY MULTIPLE WORKSHEETS
 

Using the record macro function, I can not copy multiple (50+) worksheets
from other files into one workbook. I have tried two ways. First way was
copying one sheet a a time until I rec'd a too many fonts error. The second
way was to select all sheets ina workbook and copy them to another. With the
second method I rec'd a macro error. Can anyone be of any help?

One of the great things about this group is you can get virtually any
problem solved. The advice is free and it's quick. But, you have to meet
them half way.

What 'macro error' did you get?

--
Regards,
Fred
Please reply to newsgroup, not e-mail


"Bewilderd jim" <Bewilderd wrote in message
...
Using the record macro function, I can not copy multiple (50+) worksheets
from other files into one workbook. I have tried two ways. First way was
copying one sheet a a time until I rec'd a too many fonts error. The
second
way was to select all sheets ina workbook and copy them to another. With
the
second method I rec'd a macro error. Can anyone be of any help?

Do you really need all 50 at the same time?...........maybe you could bring
in them in say 10 at a time, process them and flush them, then bring in the
next batch, etc etc.........

Vaya con Dios,
Chuck, CABGx3

"Bewilderd jim" <Bewilderd wrote in message
...
Using the record macro function, I can not copy multiple (50+) worksheets
from other files into one workbook. I have tried two ways. First way was
copying one sheet a a time until I rec'd a too many fonts error. The
second
way was to select all sheets ina workbook and copy them to another. With
the
second method I rec'd a macro error. Can anyone be of any help?

It was a runtime error "9". The following part of the macro was highlited in
yellow.
Sheets(Array("0365-3000 L", "0365-3100 L", "0365-4010 L", "0395-4001
(226-9170) L" _ , "0382-1000 (SRB21) L", "0382-3000 (TRB21-S) L", "0382-3001
(TRB21) L", _
"0386-0540 (AS21-S) L", "0386-0542 (AS21-2) L", "0380-1000 (LR21)
L", _
"0380-1001 (LR21-S) L", "0380-1002 (226-2334) L", "0380-1003 (LR400)
L", _
"0395-1200 (VM410) L", "0395-1231 (252-9696) L", "0395-3100 (RS400)
L", _
"0395-3101 (244-1714) L", "0395-4000 (AS400) L", "0395-5000 (PM400)
L", _
"0395-5030 (226-9169) L", "0386-5020 (CE21) L", "47422-30 & 47422-34
L", "SRA21 L" _
)).Copy Befo=Workbooks("monthly yld report.xls").Sheets(4)
Range("M55").Select


"Fred Smith" wrote:

One of the great things about this group is you can get virtually any
problem solved. The advice is free and it's quick. But, you have to meet
them half way.

What 'macro error' did you get?

--
Regards,
Fred
Please reply to newsgroup, not e-mail


"Bewilderd jim" <Bewilderd wrote in message
...
Using the record macro function, I can not copy multiple (50+) worksheets
from other files into one workbook. I have tried two ways. First way was
copying one sheet a a time until I rec'd a too many fonts error. The
second
way was to select all sheets ina workbook and copy them to another. With
the
second method I rec'd a macro error. Can anyone be of any help?

The report I'm doing (monthly) has to have all of the sheets included. There
are just under 100 of them in. There are no calculation done from them, they
are included for reference only to show the raw data collected.

Thanks,
Jim

"CLR" wrote:

Do you really need all 50 at the same time?...........maybe you could bring
in them in say 10 at a time, process them and flush them, then bring in the
next batch, etc etc.........

Vaya con Dios,
Chuck, CABGx3

"Bewilderd jim" <Bewilderd wrote in message
...
Using the record macro function, I can not copy multiple (50+) worksheets
from other files into one workbook. I have tried two ways. First way was
copying one sheet a a time until I rec'd a too many fonts error. The
second
way was to select all sheets ina workbook and copy them to another. With
the
second method I rec'd a macro error. Can anyone be of any help?

If they are small enough, say each the size of a letter-size paper, or
so.........perhaps several of them could be copied and pasted into one
sheet.........you could then use Hyperlinks to "find" them for
reviewing..........

Vaya con Dios,
Chuck, CABG,x3

"Bewildered Jim" wrote in message
...
The report I'm doing (monthly) has to have all of the sheets included.
There
are just under 100 of them in. There are no calculation done from them,
they
are included for reference only to show the raw data collected.

Thanks,
Jim

"CLR" wrote:

Do you really need all 50 at the same time?...........maybe you could
bring
in them in say 10 at a time, process them and flush them, then bring in
the
next batch, etc etc.........

Vaya con Dios,
Chuck, CABGx3

"Bewilderd jim" <Bewilderd wrote in
message
...
Using the record macro function, I can not copy multiple (50+)
worksheets
from other files into one workbook. I have tried two ways. First way
was
copying one sheet a a time until I rec'd a too many fonts error. The
second
way was to select all sheets ina workbook and copy them to another.
With
the
second method I rec'd a macro error. Can anyone be of any help?