Just drop the recordset into a worksheet using CopyFromRecordset and the
just use Data>Subtotals breaking on the group name.
--
__________________________________
HTH
Bob
"Claudia d'Amato" <clauama@xxxxxx> wrote in message
news:4969c761$0$31872$9b4e6d93@xxxxxx-online.net...
> Assume I have in a SQL database (Oracle) a table like:
>
> Group Name value1 value2
> 1 Karl 10 20
> 1 Paul 3 4
> 2 Tony 2 0
> 2 Ben 80 100
> 2 Peter 1 1
> 3 ....
>
> Now I want to read this table with VBA and insert it into an Excel sheet.
>
> Moreover after each group a sum line should be calculated and inserted so
> that the Excel sheet
> should look like:
>
> G name V1 V2
> 1 Karl 10 20
> 1 Paul 3 4
> 1 sum 13 24
> 2 Tony 2 0
> 2 Ben 80 100
> 2 Peter 1 1
> 2 sum 83 101
> 3 ....
> ...
>
> How can I code this in VBA ?
>
> Claudia
>