Split Up Excel Table

Hi All,

I have a table of data in excel that I need to split into numerous
sub-tables based on the total row height, in order to copy and paste them
into a powerpoint presentation.

I need to split up the tables by the total height of all the rows that can
be fitted onto a page. i.e. if I specify 20pt as the max row height per page
and the data table is 100pt I would need 5 pages to split up this data.
(this does not take into account the headers that would be copied to each
page).

Any help would be gladly appreciated - Thanks

Andi

You can loop through your rows and add up the row height. Here is a simple
example:

For i = 1 To 5
r = ActiveCell.Offset(i, 0).RowHeight + r
Next
MsgBox r

--
Damon Longworth

Don't miss out on the 2005 Excel User Conference
Sept 16th and 17th
Stockyards Hotel - Ft. Worth, Texas
www.ExcelUserConference.com


"Andibevan" <andibevan@remove-to-prevent-spam-hotmail.com> wrote in message
news:OfGXPcJfFHA.2644@TK2MSFTNGP09.phx.gbl...
> Hi All,
>
> I have a table of data in excel that I need to split into numerous
> sub-tables based on the total row height, in order to copy and paste them
> into a powerpoint presentation.
>
> I need to split up the tables by the total height of all the rows that can
> be fitted onto a page. i.e. if I specify 20pt as the max row height per
> page
> and the data table is 100pt I would need 5 pages to split up this data.
> (this does not take into account the headers that would be copied to each
> page).
>
> Any help would be gladly appreciated - Thanks
>
> Andi
>
>
>