AU SECOURS! Problème de calcul de date sous VBA

Résolu
pier0 Messages postés 67 Date d'inscription mardi 19 juillet 2005 Statut Membre Dernière intervention 2 septembre 2005 - 3 août 2005 à 11:02
pier0 Messages postés 67 Date d'inscription mardi 19 juillet 2005 Statut Membre Dernière intervention 2 septembre 2005 - 3 août 2005 à 16:32
Bonjour,
Mon problème va vous paraitre simple mais je suis encore un novice...
Voila, j'ai un tableau excel de plusieurs colonne dont 2 colonnes contiennent des dates sous la forme:

colonne 1 colonne2
EID planning EID
08/08/2005 08/08/2005 'heure non affichée

08/08/2005 27/07/2005 18:00:00 'secondes affichées


08/08/2005 08/12/2005 18:00 'minutes affichées

Mon but est de réaliser un prog VB qui calcul la différence de dates
EID-EID planning (gestion du problème que ya des cas avec dates, des cas avec dates et heures en minute et des cas avec date et heure en minute secondes) et qui colore en rouge les lignes pour lesquelles EID<EID planning.
Merci à tout ce que vous pouvez me proposer si bien en VB ou en fonction excel de calcul de date(que je connait pas trop!).

J'ai déja réussi à trouver un truc excel pour convertir les dates avec l'heure en dates sans heures avec "format de cellule" puis "nombre" mais ya un truc bizarre:ca marche pas bien pour les dates avec heures quand ya les secondes:pour que ca marche je dois après avoir fait "format de cellule" puis "nombre" appuyer sur entrée pour chaque case!!!!!

Merci à l'ame charitable volant à mon secours!!!

2 réponses

pier0 Messages postés 67 Date d'inscription mardi 19 juillet 2005 Statut Membre Dernière intervention 2 septembre 2005
3 août 2005 à 16:32
En fait après qques recherches sur le forum j'ai trouvé!
J'ai utilisé la fonction datedif("d",date1,date2) qui retourne le nb de jour de différence entre les deux.(si on veut les mois il suffit de faire "m")etc....
Merci BZY1 pour ton idée mais avec datedif("d",date1,date2) C encore plus simple.
Ciao, @+
3
BZY1 Messages postés 214 Date d'inscription jeudi 10 mars 2005 Statut Membre Dernière intervention 12 avril 2008
3 août 2005 à 11:12
essaies ça, je pense que ça marche

cells(1,1) = format(date,"dd/mm/yyyy") + format(time,"hh")
0
Rejoignez-nous