Hello -

I have a Workbook that contains Department level data (each dept has
it's own sheet), plus a number of 'helper' and consolidation sheets.
In addition, in accordance with table-driven macros, there's a sheet
(called 'ADMIN') that holds information related to the WHAT and TO
WHOM relationships. I'd like to have a macro that will, from this one
main workbook, create a series of sub-workbooks.

The ADMIN table contains two simple pieces of information:
[** data starts in row 2, with headers above]

Column A: sheet name (a 4-digit #, eg 1234)
Column B: Manager Name

Column A values DO NOT repeat ... column B values may repeat (ie, a
manager has multiple depts).

The macro should complete the following steps:
1) create 2 folders in the ActiveWorkbook.Path -- 'Depts' and
'Managers'
2) separate workbooks are created for each sheet in col A (named as
sheetname)
3) saved to 'Depts' folder
4) separate WB created for each manager, containing their depts (same
sheetnames)
5) saved to 'Managers' folder

Original workbook (containing all sheets) should remain intact (ie, no
changes) -- sub-workbooks should be values only (no links, formulas,
etc.)

Can you help create this macro? or at least help me get started??

Thanks very much for ANY help you can provide!

Rgds, Ray

Hello -

Does anyone have any ideas on my situation below?

Thanks, ray


On Jan 19, 11:01*am, Ray wrote:
Hello -

I have a Workbook that contains Department level data (each dept has
it's own sheet), plus a number of 'helper' and consolidation sheets.
In addition, in accordance with table-driven macros, there's a sheet
(called 'ADMIN') that holds information related to the WHAT and TO
WHOM relationships. *I'd like to have a macro that will, from this one
main workbook, create a series of sub-workbooks.

The ADMIN table contains two simple pieces of information:
[** data starts in row 2, with headers above]

Column A: *sheet name (a 4-digit #, eg 1234)
Column B: *Manager Name

Column A values DO NOT repeat ... column B values may repeat (ie, a
manager has multiple depts).

The macro should complete the following steps:
1) *create 2 folders in the ActiveWorkbook.Path -- 'Depts' and
'Managers'
2) *separate workbooks are created for each sheet in col A (named as
sheetname)
3) *saved to 'Depts' folder
4) *separate WB created for each manager, containing their depts (same
sheetnames)
5) *saved to 'Managers' folder

Original workbook (containing all sheets) should remain intact (ie, no
changes) -- sub-workbooks should be values only (no links, formulas,
etc.)

Can you help create this macro? *or at least help me get started??

Thanks very much for ANY help you can provide!

Rgds, Ray

Start here for ideas.

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

"Ray" wrote:

Hello -

Does anyone have any ideas on my situation below?

Thanks, ray


On Jan 19, 11:01 am, Ray wrote:
Hello -

I have a Workbook that contains Department level data (each dept has
it's own sheet), plus a number of 'helper' and consolidation sheets.
In addition, in accordance with table-driven macros, there's a sheet
(called 'ADMIN') that holds information related to the WHAT and TO
WHOM relationships. I'd like to have a macro that will, from this one
main workbook, create a series of sub-workbooks.

The ADMIN table contains two simple pieces of information:
[** data starts in row 2, with headers above]

Column A: sheet name (a 4-digit #, eg 1234)
Column B: Manager Name

Column A values DO NOT repeat ... column B values may repeat (ie, a
manager has multiple depts).

The macro should complete the following steps:
1) create 2 folders in the ActiveWorkbook.Path -- 'Depts' and
'Managers'
2) separate workbooks are created for each sheet in col A (named as
sheetname)
3) saved to 'Depts' folder
4) separate WB created for each manager, containing their depts (same
sheetnames)
5) saved to 'Managers' folder

Original workbook (containing all sheets) should remain intact (ie, no
changes) -- sub-workbooks should be values only (no links, formulas,
etc.)

Can you help create this macro? or at least help me get started??

Thanks very much for ANY help you can provide!

Rgds, Ray

.