Bonjour à tous !
Je possède une liste d'appel reçu durant le mois de Juin. Les appels ont tous été reçu entre 9h et 18h et j'aimerais avoir une moyenne du nombre d'appel par heure et par numéro de téléphone de la colonne "phoneline" (il y a 5 numéros différents).
Par exemple, sur trois jours, si je trouve que tel numéro a été appelé 12 fois le lundi entre 9h et 10h, 13 fois le mardi entre 9h et 10h et 8 fois le mercredi entre 9h et 10h, j'aimerais avoir la moyenne du nombre d'appel sur ce numéro entre 9h et 10h, soit 11 appels en moyenne sur cette plage horaire pour ce numéro.
J'ai tenté de faire une macro pour d'abord avoir le nombre d'appel mais celle-ci ne semble pas fonctionner...
Option Explicit
Sub test()
Dim dico As Object, a, i As Long, h
Set dico = CreateObject("Scripting.Dictionary")
dico.CompareMode = 1
a = Sheets(2).Range("a1").CurrentRegion.Value
dico("heure") = VBA.Array("9h-10h", "10h-11h", "11h-12h", "12h-13h", "13h-14h", "14h-15h", "15h-16h", "16h-17h", "17h-18h")
If Not dico.exists(a(i, 1)) Then
dico(a(i, 1)) = VBA.Array(0, 0, 0, 0, 0, 0, 0, 0, 0)
End If
For i = 2 To UBound(a, 1)
h = a(i, 7) \ 10000
dico(a(i, 1))(h - 8) = dico(a(i, 1))(h - 8) + 1
Next
With Sheets(2).Range("k1")
.CurrentRegion.Clear
.Resize(dico.Count, 9).FormulaLocal = _
Application.Transpose(Application.Transpose(dico.items))
End With
End Sub
Je vous laisse les données sur lesquelles je travaille :
PS : l'heure est donnée par la colonne "time" sous la forme suivante : 17h45m33s donne 174533.
Merci d'avance !