Copier format heure puis décimal
Résolu/Fermé
bidounet84
-
Modifié le 1 févr. 2018 à 13:21
bidounet84 Messages postés 416 Date d'inscription jeudi 28 août 2008 Statut Membre Dernière intervention 22 mai 2023 - 2 févr. 2018 à 08:07
bidounet84 Messages postés 416 Date d'inscription jeudi 28 août 2008 Statut Membre Dernière intervention 22 mai 2023 - 2 févr. 2018 à 08:07
A voir également:
- Copier format heure puis décimal
- Telecharger format factory - Télécharger - Conversion & Codecs
- Format epub - Guide
- Copier une vidéo youtube - Guide
- Format apfs - Guide
- Super copier - Télécharger - Gestion de fichiers
4 réponses
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 775
1 févr. 2018 à 13:44
1 févr. 2018 à 13:44
Bonjour,
« 1er problème si plus de 24h dans l'autre fichier le chiffre n'est pas bon. »
1) C'est pas le nombre qui n'est pas bon, c'est son format :
2) Pour obtenir une heure décimale :
Cordialement
Patrice
« 1er problème si plus de 24h dans l'autre fichier le chiffre n'est pas bon. »
1) C'est pas le nombre qui n'est pas bon, c'est son format :
onglet_BDD.Cells(ligne_Compléter, 8).Value = onglet_Fiche.Cells(ligne_àcopier + 7, 7).Value onglet_BDD.Cells(ligne_Compléter, 8).NumberFormat = onglet_Fiche.Cells(ligne_àcopier + 7, 7).NumberFormat
2) Pour obtenir une heure décimale :
Dim temps As Date Dim heure As Double temps = BDD.Cells(ligne_àcopier, 8).Value heure = temps * 24 TRVFINITION.Cells(ligne_Compléter, 8).Value = heure--
Cordialement
Patrice
bidounet84
Messages postés
416
Date d'inscription
jeudi 28 août 2008
Statut
Membre
Dernière intervention
22 mai 2023
80
1 févr. 2018 à 13:54
1 févr. 2018 à 13:54
Merci.
Juste un dernier point j'initialise ma variable heure à 0 car il y a plusieurs lignes à copier.
Comment initialiser temps qui est une date.
J'ai testé date = "" mais çà bloque.
Juste un dernier point j'initialise ma variable heure à 0 car il y a plusieurs lignes à copier.
Comment initialiser temps qui est une date.
J'ai testé date = "" mais çà bloque.
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 775
1 févr. 2018 à 16:10
1 févr. 2018 à 16:10
Sans le code c'est difficile de comprendre ton problème !
Je ne vois pas pourquoi tu voudrais initialer temps ...
Pour affecter un temps à une variable Date :
Je ne vois pas pourquoi tu voudrais initialer temps ...
Pour affecter un temps à une variable Date :
Dim temps As Date temps = #2/1/2018 4:02:00 PM# 'Attention au format, c'est m/d/yyyy 'ou temps = #2/1/2018# 'ou temps = #16:02:00#
ccm81
Messages postés
10851
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
16 avril 2024
2 404
1 févr. 2018 à 15:58
1 févr. 2018 à 15:58
Bonjour
Une date est un entier long donc temps = 0
Cdlmnt
Une date est un entier long donc temps = 0
Cdlmnt
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 775
1 févr. 2018 à 16:27
1 févr. 2018 à 16:27
Bonjour,
La date (sans les heures) est un entier Long mais une variable Date est codée sur 8 octets et correspond à un Double (malgré que ses valeurs extrêmes soient contenues dans celles d'un Single) .
Cordialement
Patrice
La date (sans les heures) est un entier Long mais une variable Date est codée sur 8 octets et correspond à un Double (malgré que ses valeurs extrêmes soient contenues dans celles d'un Single) .
Cordialement
Patrice
bidounet84
Messages postés
416
Date d'inscription
jeudi 28 août 2008
Statut
Membre
Dernière intervention
22 mai 2023
80
2 févr. 2018 à 08:07
2 févr. 2018 à 08:07
Ok merci effectivement pas besoin d'initialiser.