Heure d'été et visual basic

Bourinos Messages postés 8 Statut Membre -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

J'ai un fichier Excel 2007 qui contient une macro Visual Basic et dans cette macro je voudrais qu'il y ait une vérification de l'heure d'été.
De manière à voir quelque chose du genre : If heuredete = true then ...
Or je n'ai pas trouvé de commande simple qui permet cette vérification.
Quelqu'un a-t-il une astuce ?

Cordialement

1 réponse

  1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    bonjour

    peut-^tre en jouant sur les dates de passage à l'horaire d'été ?..
    0
    1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
       
      par exemple (trouvé dans mon grenier)

      la date à tester en A2

      passage été en c2
      =DATE(ANNEE(A2);4;1)-JOURSEM(DATE(ANNEE(A2);3;31))
      passage hiver en D2
      =DATE(ANNEE(A2);11;1)-JOURSEM(DATE(ANNEE(A2);10;31))

      renvoie 1 si été, 0 si hiver
      =(A2>C2)*(A2<D2)

      si tu tiens à vrai et faux
      =SI((A2>C2)*(A2<D2);VRAI;FAUX)
      0