Fonction CDBL dans VBA

Fermé
catherine - 19 mars 2012 à 18:52
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 20 mars 2012 à 07:50
Bonjour,

j'essaie d utiliser dans VBA la foncion CDBL qui est l'équivalent de CNUM pour transformer des heures en nombres mais dèsfois ca marche desfois non . Si l'heure est sous format 7:00 ca ne marche pas si elle est sous format : 07:00:00 oui ca marche!

voici mon code

Dim X As Integer
For X = 7 To 51
Range("A" & X).Value = CDbl(Range("C" & X).Value)
'Range("A7:A51").Value = CDbl(Range("C7:C51").Value)

Next X

MERCI DE VOTRE AIDE

<config>Windows 7 / Internet Explorer 9.0</config>

1 réponse

lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 191
Modifié par lermite222 le 20/03/2012 à 07:55
Bonjour,
Range("A" & X).Value = TimeValue(Range("C" & X).Value)
Mais il y a plus simple, tu copie toute la colonne C sur la colonne A
Ensuite tu met le format de la colonne A en texte.
Et si tu met la colonne C en format Texte tu auras tes heures au format nombre.
A+
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
NOTE : Je ne répond pas aux MP pour les questions techniques.
0