• Initiateur de la discussion Initiateur de la discussion marida
  • 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 !

M

marida

Guest
Bonjour,
j'ai écris une macro des résultats par mois selon l'année choisie
mais quand j'ajoute la condition de datediff pour calculer si l'écart entre deux dates est supérieur à 0, je n'obtiens aucun résultat...

Voir PJ

Merci pour votre aide.
 

Pièces jointes

Re : datediff en VBA

Bonjour à tous

Avec les exemples donnés, DateDiff renvoie toujours un nombre négatif (la date en colonne D est toujours antérieure à la date en colonne B).


ROGER2327
#5920


Samedi 14 Merdre 139 (Saint Sphincter, profès - fête Suprême Quarte)
12 Prairial An CCXX, 6,5174h - bétoine
2012-W22-4T15:38:30Z
 
Re : datediff en VBA

Re...



Code:
derniereLigne = Cells(65536, 1).End(xlUp).Row
renvoie 1 donc
Code:
 For i = 2 To derniereLigne
     'Code
 Next i
n'est jamais exécuté...​


ROGER2327
#5922


Samedi 14 Merdre 139 (Saint Sphincter, profès - fête Suprême Quarte)
12 Prairial An CCXX, 6,9120h - bétoine
2012-W22-4T16:35:19Z
 
Re : datediff en VBA

Bonjour,

si j'ai bien compris :
derniereLigne = Cells(65536, 1).End(xlUp).Row est censé parcourir la dernière ligne non vide du classeur en remontant
alors je ne comprends pas pourquoi cela donne 1:
merci de m'éclairer.
 
Re : datediff en VBA

Re- bonjour à tous
Bonjour,

si j'ai bien compris :
derniereLigne = Cells(65536, 1).End(xlUp).Row est censé parcourir la dernière ligne non vide du classeur en remontant
alors je ne comprends pas pourquoi cela donne 1:
merci de m'éclairer.
parce que ce code teste la première colonne Cells(65536, 1) ........ qui est vide
il suffit de remplacer 1 par 4 pour la colonne D
ou par 7 pour la colonne G


à+
Philippe
 
- 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

Réponses
3
Affichages
443
Réponses
6
Affichages
662
Retour