Se você não for adverso ao uso do VBA, eu posso voltar com um código mais detalhado depois, mas no código pseudo-ish:
Dim array(1, 1) As Long
For i = 1 To Len(table)
' if value is already in the array, skip this part. if not, redim the array and store the value.
If Not Match(Cells(1, i), array) <> 0 Then
ReDim array(1, i)
array(1, i) = Cells(1, i).Value
End If
' write the time intervals for comparison
Dim intervals(2, 1)
' iterate over the column where timestamps are and write all of them to array, checking with array(1, i) to make sure the ID is correct. redim as required.
' sort the array and measure for 5min intervals.
' keep a unique-values variable that you increment every time a satisfactory interval is found.
Next i
Você pode enviar esses valores para a planilha, para um arquivo ou em um msgbox.