Sujet Précédent Sujet Suivant

Somme d'une date et d'une constante

Résolu/Fermé
Luronco27 - 20 déc. 2017 à 13:05
Luronco27 Messages postés 17 Date d'inscription mercredi 20 décembre 2017 Statut Membre Dernière intervention 10 janvier 2019 - 23 déc. 2017 à 10:10
Bonjour, je travaille sur un projet client d'hôtel et j'aimerais savoir comment procéder pour obtenir la date départ suivant l'arrivée et le séjour.
Exemple : si mon label correspondant à séjour (textsej) reçoit 14 et que celui d'arrivée est format(now, "ddd.mmm.yyyy"), j'obtiens automatiquement la date de départ par addition.
Merci d'avance


3 réponses

Réponse 1 / 3
Whismeril Messages postés 19028 Date d'inscription mardi 11 mars 2003 Statut Non membre Dernière intervention 24 avril 2024 931
Modifié le 20 déc. 2017 à 20:29 
Cells(1, 2).Value = 14
Cells(1, 3).Value = Now

Dim laDate As Date
laDate = CDate(Cells(1, 3).Value)

Dim duree As Integer
duree = CInt(Cells(1, 2).Value)

Dim laFin As Date
laFin = DateAdd("d", duree, laDate)
Cells(1, 4).Value = laFin 'n'utilise pas Format, car là on à 03/01/2018, une fois passé en string Excel l'interprète à l'Américaine, et donc affiche 1 mars 2018.


Quand j'étais petit, la mer Morte n'était que malade.
George Burns
1
Luronco27 Messages postés 17 Date d'inscription mercredi 20 décembre 2017 Statut Membre Dernière intervention 10 janvier 2019 2
20 déc. 2017 à 22:30
Grand merci pour ton aide précieux ça fonctionne à merveille
0
Réponse 2 / 3
Whismeril Messages postés 19028 Date d'inscription mardi 11 mars 2003 Statut Non membre Dernière intervention 24 avril 2024 931
20 déc. 2017 à 16:49
Bonjour,
quel VB?
  • VBS
  • VBA -> précisez:
    • Word
    • Excel
    • Access
    • Powerpoint
    • Autre
  • VB6 (ou antérieur, précisez)
  • VB.Net - précisez la Framework et ->
    • Winform
    • WPF
0
Luronco27 Messages postés 17 Date d'inscription mercredi 20 décembre 2017 Statut Membre Dernière intervention 10 janvier 2019 2
Modifié le 20 déc. 2017 à 17:06
Merci d'avance pour la précision demandée je m'en excuse. Il s'agit d'un code vba excel 2010. Pour être plus précis : cells(1,2)=14 et cells(1,3)=format(now, "ddd.mmm.yyyy")
Je veux la somme en format date.
Remerci d'avance
0
Réponse 3 / 3
Whismeril Messages postés 19028 Date d'inscription mardi 11 mars 2003 Statut Non membre Dernière intervention 24 avril 2024 931
21 déc. 2017 à 08:44
De rien, pense à marquer le sujet résolu si cela te convient
0
Luronco27 Messages postés 17 Date d'inscription mercredi 20 décembre 2017 Statut Membre Dernière intervention 10 janvier 2019 2
23 déc. 2017 à 10:10
It's done, thks again
0

Discussions similaires

Pix
Anyssa -
vibe -

4 réponses
somme.si.ens critere entre deux dates
texas4229 -
Ariel7 -

11 réponses
Somme SI égal ou inférieur à aujourd'hui !
Grincheux10 -
Grincheux10 -

6 réponses
Prélèvement JM Jacquie et Michel date.
Kekradinho -
Kar -

31 réponses
je cherche la date et le lieu de naissance d une personne
country -
bg62 -

2 réponses