VBA/Excel2003/Importer date dans variable
by
-
Polux31 Messages postés 6917 Date d'inscription Statut Membre Dernière intervention -
Polux31 Messages postés 6917 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je dois calcule la différence entre deux dates de type 28/6/11 14:20, et ceux pour 2 colonnes (et je débute en VBA)
Plusieurs topic en parlent déjà mais aucun ne m'aide vraiment (je suis peut-être pas tombé sur le bon)
Voici mon code (je crée une fonction, et j'essaie de la rappeler dans ma procédure Sub, seulement, j'ai du mal à stocker dans ma variable la date apparaissant dans mes cellules)
Function EcartDates(DateDemande As Date, DebutRealisation As Date) As Double
EcartDates = DateDiff("h", DateDemande, DebutRealisation, vbMonday, vbFirstJan1)
End Function
Sub Delai()
Dim i As Byte
Dim DateDemande As Date
Dim DebutRealisation As Date
For i = 2 To 10
DateDemande = Worksheets("Depart").Cells(i, L).Value
DebutRealisation = Worksheets("Depart").Cells(i, L).Value
Worksheets("Depart").Cells(i, BQ) = EcartDates(DateDemande, DebutRealisation)
Next
End Sub
Merci d'avance pour votre aide
Je dois calcule la différence entre deux dates de type 28/6/11 14:20, et ceux pour 2 colonnes (et je débute en VBA)
Plusieurs topic en parlent déjà mais aucun ne m'aide vraiment (je suis peut-être pas tombé sur le bon)
Voici mon code (je crée une fonction, et j'essaie de la rappeler dans ma procédure Sub, seulement, j'ai du mal à stocker dans ma variable la date apparaissant dans mes cellules)
Function EcartDates(DateDemande As Date, DebutRealisation As Date) As Double
EcartDates = DateDiff("h", DateDemande, DebutRealisation, vbMonday, vbFirstJan1)
End Function
Sub Delai()
Dim i As Byte
Dim DateDemande As Date
Dim DebutRealisation As Date
For i = 2 To 10
DateDemande = Worksheets("Depart").Cells(i, L).Value
DebutRealisation = Worksheets("Depart").Cells(i, L).Value
Worksheets("Depart").Cells(i, BQ) = EcartDates(DateDemande, DebutRealisation)
Next
End Sub
Merci d'avance pour votre aide
A voir également:
- VBA/Excel2003/Importer date dans variable
- Importer favoris chrome - Guide
- Importer favoris firefox - Guide
- Importer agenda outlook dans google - Guide
- Importer contact carte sim - Guide
- Whatsapp date incorrecte ✓ - Forum Mobile
