VBA-e - soustraires des heures Fermé

Question

Bonjour,
j'ai 1 tableau dans Excel avec des dates au format : x/x/x 00:00:00 avec l'heure. (Feuil1)
j'ai 1 autre onglet (heures) dans lequel j'ai un commandbutton_1, je voudrai lorsque je clique dessus, qu'il me sorte toutes les dates/heures de plus de 48h.

commt coder ca, merci !

yg_be · Answer

Que veux-tu dire exactement par "toutes les dates/heures de plus de 48h" ?
Et comment veux-tu recevoir ces dates/heures ?  
L'ordre est-il important ?
Quel est le rôle des deux feuilles ?

Invite5 · Answer

Bonjour !
Enfait dans une feuille appelé liste_date, j'ai des lignes ou si les dates sont de plus de 48h, un 1 s'inscrit dans la colonne Z.
Je voudrai lorsque je clique sur un bouton appelé : "date de plus de 48h" (dans un onglet dates) qu'il me copie toutes les lignes de la feuille liste_date ou il y a un 1, dans la feuille "date de plus de 48h" .
L'odre n'est pas important.
Le role de la feuille liste_date c'est une liste ou on enregistre des opérations.
date de plus de 48h c'est pour faire des stats, il y a des dates de plus de 72h etc...

merci !

michel_m · Answer

Bonjour

les dates sont de plus de 48h
quelque chose m'échappe; pour moi il y a 24 heures dans une date mais...
Explique toi un peu mieux car j'ai rien compris... peut -^tre est ce une différence de dates comme tu l'indiques dans le titre ?...

Invite5 · Answer

Oui voila c'est une différence de date !
Ca c'est réglé, mais je voudrai sortir dans une autre feuille (onglet) toutes les différences de dates de 48h c'est à dire toutes les lignes ou il y a un 1 dans la colonne Z.

exemple : private sub macro ()
Dim myRange As Range
Dim cell As Range
Set myRange = ActiveSheet.Range("A1:Z65000")
For Each cell In myRange
If range ("Z1").value = "1" then 
Copy After:=Workbooks(Fichier).Sheets(date de plus de 48h) 
next range
end sub

Quelque chose comme ca ! 
merci !

Invite5 · Answer

Comment procéder?

VBA-e - soustraires des heures

5 réponses

Discussions similaires