Вы отметили это как вопрос vba, но результат может быть легко достигнут с помощью формулы.
Если вы используете Excel 2007 или более позднюю версию, используйте функцию AVERAGEIFS
=AverageIfS(B:B,A:A,">="&<StartTime>,A:A,"<"&(<StartTime>+10/1440))
Замените <StartTime>
ссылкой на ячейку, содержащую начало вашего 10-минутного периода.