Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Différence entre 2 dates dans une macro

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion joquetino
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
J

joquetino

Guest
Bonjour à tous,

Je cherche à calculer le nombre d'années entre 2 dates. J'ai parcouru le forum, et visiblement il faut utiliser la fonction DATEDIF().
Seulement, moi je veux calculer cet écart dans une macro (en VBA), et non directement sous Excel (et DATEDIF n'est pas reconnu). Quelle fonction dois-je utiliser, sachant que j'aimerais calculer la chose suivante?

Différence entre 1er Janv 2007 et 1 er Mars 2008 = 1,2 (1 année et 2 mois)

Un grand merci d'avance
 
Trier par date Trier par votes
Re : Différence entre 2 dates dans une macro

Bonjour le Forum,

Pas de problème pour la solution, mais un petit bout de fichier serait le bienvenu pour voir d'où viennent les valeurs et sous quelle forme et où la réponse doit de placer.

Amicalement, Hervé.
 
Vote positif 0 Vote négatif
Re : Différence entre 2 dates dans une macro

bonjour joquetino, le forum

dim dat1 as date, dat2 as date, dat3 as date, dif as single

dat1 = cdate("01/01/2007") : dat2 = cdate("01/03/2008") : dat3 = dat2-dat1
dif = (1900-year(dat3)+(month(dat3)/10)

oups collision : bonjour herve
 
Vote positif 0 Vote négatif
Re : Différence entre 2 dates dans une macro

Baside à dit:
Bonjour le Forum,

Pas de problème pour la solution, mais un petit bout de fichier serait le bienvenu pour voir d'où viennent les valeurs et sous quelle forme et où la réponse doit de placer.

Amicalement, Hervé.
Cliquez pour agrandir...
Bonjour,

Voici un exemple de fichier très très simplifié.
Merci Wilfried pour votre solution, mais il m'indique un chiffre erroné visiblement.
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Différence entre 2 dates dans une macro

Bonjour le Forum, Wilfried_42,

Avec

dat1 = CDate("01/01/2007"): dat2 = CDate("01/03/2008"): dat3 = dat2 - dat1
dif = (1900 - Year(dat3) + (Month(dat3) / 10))
MsgBox Month(dat3) & " Mois et " & (Year(dat3) - 1900) & " An"

Amicalement, Hervé

P.S. Grandement inspiré de la solution de Wilfried
 
Vote positif 0 Vote négatif
Re : Différence entre 2 dates dans une macro

Re

Je viens de voir que j'avais laissé la ligne dans le code, mais le principal, bien sûr, était le code de la Msgbox :lol:

A plus

Cela marche, c'est le principal
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

B
  • Résolu(e)
Microsoft 365 Calcule durée moyenne : Formule et TCD
Réponses
6
Affichages
305
BSF
B
  • Question Question
Microsoft 365 VBA : fonction qui calcule une durée entre 2 dates en années, mois et jours
Réponses
8
Affichages
443
BenHarber
F
  • Question Question
XL 2016 Calculer la différence entre deux dates en mois
Réponses
5
Affichages
844
vgendron
F
  • Question Question
XL 2019 Calcul ecart type entre 2 dates filtré par année et par nom
Réponses
4
Affichages
431
ALS35
A
N
  • Résolu(e)
Microsoft 365 Macro entre 2 classeurs
2
Réponses
19
Affichages
761
Nounours4173
N
P
  • Question Question
XL 2019 Nbre de mois entre 2 dates
2
Réponses
15
Affichages
1 K
Power
P
A
  • Question Question
XL 2016 Exclure une période des calcule de jours entre 2 dates (Datedif)
Réponses
2
Affichages
1 K
job75
P
  • Résolu(e)
Microsoft 365 macro qui permet de basculer entre 2 valeurs composées de formules de type "Formula local"
2
Réponses
15
Affichages
548
cathodique
D
  • Question Question
Microsoft 365 Différence entre deux dates
Réponses
10
Affichages
635
Daniel200666
D
A
  • Question Question
Microsoft 365 Macro pour recherche de cellules entre 2 fichiers Excel
Réponses
7
Affichages
529
AtTheOne
  • Résolu(e)
Microsoft 365 comment "ralentir" une macro
Réponses
9
Affichages
626
Eric 888
  • Question Question
Microsoft 365 Recherche incomplète planning (problème de dates)
Réponses
13
Affichages
799
p56
F
  • Résolu(e)
XL 2019 Power query - "Qualifier" une série d'année
Réponses
2
Affichages
538
Flx1er
F
H
  • Question Question
Microsoft 365 Durée entre 2 dates
Réponses
13
Affichages
861
Harleyquin
H
H
  • Question Question
Microsoft 365 Calcul d'une somme de données entre 2 dates (1 ancienne et aujourd'hui)
Réponses
13
Affichages
1 K
Heian911
H
  • Résolu(e)
XL 2013 Une formule pour calculer la différence entre 2 dates en combinant 3 formules en une
Réponses
10
Affichages
1 K
HE_RA
POWERQUERY :: LES DATES REMARQUABLES
Réponses
5
Affichages
659
oguruma
T
  • Question Question
XL 2016 Saisir la différence entre 2 dates sous 2 conditions
Réponses
6
Affichages
830
Dranreb
D
  • Résolu(e)
Microsoft 365 Calculer jours ouvrés entre 2 dates
Réponses
9
Affichages
1 K
DR85
D
Y
  • Question Question
XL 2019 Calcul différence de temps entre 2 activités
Réponses
2
Affichages
801
Hasco
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…