VB code to total up a column as the value change on another

Hello Everyone,

I got a Excel tabel like below.
I want to write a code to Total up some figures.
Every Change in Date (Column A), Flight No (Column B), Out/In(Column
D), Column H's figures should total up to "Column I" as it shown in
the example above.
Like wise Column J's figures should total up to Column K.
As user add records i want it to automaticaly update Column I and
Column K.



A B D H I J K
Date Flight Out/ Total Total Return Return
No. In Per Per Per Per
Series Flight Series Flight

10.01.05 878 Out 6 2
10.01.05 878 Out 10 16 3 5
10.01.05 878 In 15 5
10.01.05 878 In 10 4
10.01.05 878 In 10 35 9 18
10.01.05 578 Out 15 5
10.01.05 578 Out 12 27 3 8
10.01.05 578 In 20 6
10.01.05 578 In 20 40 4 10
11.01.05 878 Out 6 2
11.01.05 878 Out 10 16 3 5
11.01.05 878 In 10 4
11.01.05 878 In 10 20 9 13
11.01.05 578 Out 15 5
11.01.05 578 Out 12 27 3 8
11.01.05 578 In 20 6
11.01.05 578 In 20 40 4 10




Is there a way to do this in VB coding?

A help will be really appriciated.

Thank you very much in advance.

Hello Fernando,

What you want to do is not clear. What do the Totals in Column "H" and Column "I" represent and what are they counting? Repost your answers and I will help you.

Sinerely,
Leith Ross