Récupérer des valeurs horaire à un pas de temps définis

Bonjour,

J'ai un jeu de données brut de plusieurs semaines ou j'ai l'heure d'activation et l'heure d'arrêt d'un appareil électrique.

L'activation se matérialise par : 1

L'arrêt se matérialise par : 0

Je souhaite connaitre le temps de fonctionnement sur des pas de temps de 5 minutes car je veux comparer son fonctionnement avec d'autres appareils sur les mêmes intervalles de temps.

Les données brut prennent la forme suivantes :

.......

et je souhaiterai obtenir les temps de fonctionnement sur ces intervalles :

J'avoue ne pas réussir a trouver une solutions "automatisé" de la chose même si certaine étapes intermédiaire doivent surement être nécessaire.

Dans l'attente de votre aide, merci !

Salut,

Je ne suis pas sûr de comprendre le souci : si tu soustrais les lignes se terminant par 1 (activation) à celles en 0, tu auras la durée de fonctionnement.

Et pour la 2ème question, tu voudrais donc voir 00:01:01 (la diff entre 00:08:56 et 00:09:57) à côté de 02/02/2024 00:05 ?

Si tu pouvais mettre ça dans un fichier Excel, ça nous aiderait.

Bonjour à tous,

Une piste ? Voir formule en F1 à recopier vers le bas (la source doit être trier en ordre croissant) :

Hello,

Une proposition PowerQuery,

Je me suis peut être pris la tête mais ça a l'air de fonctionner

Tu remplis le tableau de gauche et tu fais clic droit puis actualiser sur le tableau de droite

@+

Edit : J'ai fait sur des durées de 5 secondes au lieu de 5 minutes ..............

Je corrige ça rapidement

bonjourà tous,

une solution via une fonction personnalisée minuteintervalle

à utiliser comme une fonction standard excel

=minuteintervalle(debutintervalle, finintervalle, tableau) où

debutintervalle est la valeur du début de l'intervalle

finintervalle est la valeur de fin de l'intervalle

tableau est un tableau de n ligne et 2 colonnes, la première contenant les dates et heures et la deuxième pour indiquer début et de fin de l'activité.

Function minuteintervalle(debutintervalle, finintervalle, tableau As Range)
    t = tableau.Value
    For i = 1 To UBound(t)
        If tableau(i, 2) = 1 Then
            If tableau(i, 1) < finintervalle And tableau(i + 1, 1) >= debutintervalle Then
                minuteintervalle = Application.Min(finintervalle, tableau(i + 1, 1)) - Application.Max(debutintervalle, tableau(i, 1))
                Exit Function
            End If
            If tableau(i, 1) > finintervalle Then Exit For
        End If
        Next i
        minuteintervalle = 0
End Function

Bonjour

Une solution PowerQuery