Formule date

Bonjour,

Pouvez-vous m'indiquer s'il existe une fonction permettant de distinguer les dates entre une date d'arrivée et une date de départ.
Ci-joint un exemple:
Date d'arrivée le 1er mars et date de départ le 5 mars.
J'aimerai que la formule me précise la date du 1/03, 2/03, 3/03, et 4/03 et non juste l'intervalle de 4 nuits.

Merci d'avance pour votre aide,


3 réponses

  • Votes
  • Date
  • Date décroissante
  1. Bonjour,

    « J'aimerai que la formule me précise la date du 1/03, 2/03, ...; »
    Dans quelles limites ? 4 jours ou 7 jours ou ... ?
    Pour 365 jours ça va pas être facile à faire tenir dans une cellule !!!
    1. Bonjour Patrice,

      Merci pour votre réponse.
      Je ne sais pas trop la limite sachant que les durées de séjour sont disparates. Par exemple, du 1/03 au 5/03 (soit 4 jours) mais également des données qui font références à des séjours du 2/03 au 10/03 (soit 8 jours),...
      Et tous ces intervalles de durée de séjour différents s'échelonnent sur une année civile de 365 jours.
      Dur dur???

      Merci d'avance pour votre aide,
  2. Bonjour,

    Une proposition avec une fonction personnelle
    https://www.cjoint.com/c/FGmiBt2f5vs

    A+
    1. Bonjour Gyrus,
      Merci pour votre aide.
      Par contre, je ne comprends pas pourquoi mon excel (2016) ne me propose pas la fonction nuitées. Faut-il que j'active certains paramètres?
      Merci d'avance,
    2. @eloditInutile de chercher, Excel ne propose pas cette fonction.
      Il s’agit d’une fonction complémentaire que j’ai créée.

      Le code est placé dans un module standard.
      Pour le visualiser,
      - ouvrir l'éditeur à partir du raccourci clavier ALT+F11,
      - ouvrir l'explorateur de projets à partir du raccourci clavier CTRL+R,
      - double-cliquer sur Module 1.
      Voici le code :
      Function Nuitées(DateDepart As Date, DateRetour As Date) As String
      Dim NbNuitée As Integer
      Dim Texte As String, T As String
      Dim d As Date
      NbNuitée = DateRetour - DateDepart
      If NbNuitée > 1 Then
      T = " nuitées :"
      Else
      T = " nuitée :"
      End If
      Texte = CStr(DateRetour - DateDepart) & T & Chr(10)
      For d = DateDepart To DateRetour - 1
      Texte = Texte & Format(d, "dd/mm") & Chr(10)
      Next d
      Nuitées = Left(Texte, Len(Texte) - 1)
      End Function


      Sous le module de la Feuil1, j’ai également créé une procédure évènementielle qui permet d’ ajuster la hauteur des lignes.
      Private Sub Worksheet_Change(ByVal Target As Range)
      Cells.EntireRow.AutoFit
      End Sub


      A+
    3. @GyrusUn grand merci Gyrus,
      Tout fonctionne c'est super!
      Merci bcp pour votre aide,