Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1906 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA] variable et heure absolue

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA] variable et heure absolue

n°1579553
chico008
what the wookie says ?
Posté le 26-06-2007 à 19:03:16  profilanswer
 

bonjour
 
j'ai (encore) un soucis en VBA.
 
je fait un petit traitement de données, en lisant une cellule dans une page, et la recopiant avec d'autre données dans une autre page (données epurer et preparer)
seul soucis, un des champ de la première page est en heure, le problème c'est pas tellement les heures, mais le fait que j'ai des heures superieur a 24, cad que je peut avoir comme donnée 01:54:02 comme je peut avoir 640:02:78.
quand l'heure est en standard (inferieur a 24) j'arrive a le retrouver en formatant ma variable, mais quand c'est superieur a 24, ca marche pas, il me le donne avec une date en plus.
 
est il possible en vba de recuperer mes heures mais avec des heures superieur a 24 ?
 
Merci.

mood
Publicité
Posté le 26-06-2007 à 19:03:16  profilanswer
 

n°1579636
chico008
what the wookie says ?
Posté le 26-06-2007 à 22:23:46  profilanswer
 

et bien, j'ai du poser une sacré colle.

n°1579637
jpcheck
Pioupiou
Posté le 26-06-2007 à 22:25:37  profilanswer
 

avec les modulo peut être ?

n°1579667
chico008
what the wookie says ?
Posté le 26-06-2007 à 23:19:11  profilanswer
 

euh cad ?

n°1579669
kiki29
Posté le 26-06-2007 à 23:23:00  profilanswer
 

Sous forme de fonction personnalisée, donc à placer dans un module
et à adapter et tester


Option Explicit
 
Function RecupHeures(ByVal c As Range) As String
Dim Jour As Integer
Dim Heures As Integer
Dim Minutes As Integer
Dim Secondes As Integer
 
    Jour = Int(c)
    Heures = Int((c - Jour) * 24)
    Minutes = Int(((c - Jour) * 24 - Heures) * 60)
    Secondes = Int((((c - Jour) * 24 - Heures) * 60 - Minutes) * 60)
 
    RecupHeures = CStr(Jour) & "j " & CStr(Heures) & "h " & CStr(Minutes) & "mn " & CStr(Secondes) & "s"
End Function

n°1579680
chico008
what the wookie says ?
Posté le 26-06-2007 à 23:42:16  profilanswer
 

je pensais aussi a un truc du genre, mais si ya moyen de faire plus simple c'est pas plus mal, sinon tand pis, je passerais par cette methode.


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA] variable et heure absolue

 

Sujets relatifs
[RESOLU] Construire le nom d'un objet (VBA)Probleme [VBA] importation données excel dans Access
[RESOLU]-[HTML][JAVASCRIPT] guillemet variableVariable PATH
[RESOLU]javascript + variable[resolu]$_GET avec variable contenant des espaces
Besoin d'un génie lol pour résoudre $donnees['variable'][VBA Excel]Passage d'une variable d'un Userform à un autre
PING .BAT AVEC DATE ET HEURE 
Plus de sujets relatifs à : [VBA] variable et heure absolue


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR