Calcul heures

Bonjour!!!

Voilà, j'ai une question et je ne trouve pas comment faire. Vous avez le fichier en PJ et j'aimerais simplifier la vie de celle qui s'en occupe.

Elle ecrit manuellement TOUTES les heures! Existe-t-il une formule qui permet de mettre les heures GMT (-2h) automatiquement lorsqu'elle change les heures de Paris?

En fait comme tout est dans une même case je n'arrive pas trop...

Merci par avance pour elle!!!

Bonjour,

solution via une macro

Sub aargh()
    Dim dl As Long, i As Long, h1 As Date, h2 As Date, a, h
    dl = Cells(Rows.Count, 1).End(xlUp).Row
    For i = 1 To dl
        a = Cells(i, 1)
        If Left(a, 1) Like "#" Then
            h = Split(a, "-")
            If UBound(h) > LBound(h) Then
                h1 = TimeValue(h(LBound(h))) - 2 / 24
                h2 = TimeValue(h(UBound(h))) - 2 / 24
                Cells(i, 2) = Format(h1, "hh:mm") & " - " & Format(h2, "hh:mm")
            End If
        End If
    Next i
End Sub

C'est super gentil mais je sais pas où et comment mettre en place cette macro...

Désolée je suis un peu un boulet!

h2so4 a écrit :

Bonjour,

solution via une macro

Sub aargh()
    Dim dl As Long, i As Long, h1 As Date, h2 As Date, a, h
    dl = Cells(Rows.Count, 1).End(xlUp).Row
    For i = 1 To dl
        a = Cells(i, 1)
        If Left(a, 1) Like "#" Then
            h = Split(a, "-")
            If UBound(h) > LBound(h) Then
                h1 = TimeValue(h(LBound(h))) - 2 / 24
                h2 = TimeValue(h(UBound(h))) - 2 / 24
                Cells(i, 2) = Format(h1, "hh:mm") & " - " & Format(h2, "hh:mm")
            End If
        End If
    Next i
End Sub

Bonjour

sur le forum

sélectionner tout le code

faire ctrl-C pour le copier

aller dans excel

faire alt-F11, (ceci ouvre l'éditeur de macro (VBA))

menu->insérer->module

coller le code (ctrl-V)

-- la macro est installée

faire alt-F11 pour revenir au classeur excel

sauver le classeur avec les macros (ceci donnera au classeur une extension .xlsm au lieu de .xlsx)

pour utiliser la macro (une fois qu'elle est installée)

faire alt-F8 après avoir sélectionné la feuille sur laquelle il faut soustraire 2 heures aux heures locales

Trop top merci merci merci!!!!