Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
Vieux 08/02/2010, 16h47   #1
Membre Confirmé
 
Date d'inscription: juin 2008
Messages: 217
Par défaut convertir heure ! un peu particulier

Bonjour,
j'ai un fichier excel, ou le format des heures, est un format personaliser du type "00,00".
ce qui fait que pour "06h15", on doit écrire "06,15"
j'ai besoin de recuperer cette valeur de cellule "06,15" dans une autre , mais de type "hh:mm" et donc lire "06:15"

je n'y arrive pas..
je pense qu'il faut personnaliser le format de la cellule ET
passer par un calcul... aussi..
mais je nage...
libre à vos idées !!

cdt

julien!
djoumusic est déconnecté   Envoyer un message privé Réponse avec citation
Vieux 08/02/2010, 17h30   #2
Candidat au titre de Membre du Club
 
Date d'inscription: janvier 2010
Messages: 20
Par défaut

Bonjour,
Mets cette formule dans ta cellule d'arrivée:
Citation:
=IF(FIND(",";AC38;1);LEFT(AC38;FIND(",";AC38;1)-1)&":"&RIGHT(AC38;LEN(AC38)-FIND(",";AC38;1));"")
Comme cela quelque soit la longueur de ta valeur de départ (du genre 6,15 ou 6,1) à l'arrivée tu auras tjr un format avec les ":"

Nota : AC38 c'est la cellule à traiter.

A+
patyom est déconnecté   Envoyer un message privé Réponse avec citation
Vieux 08/02/2010, 20h47   #3
Membre Confirmé
 
Date d'inscription: juin 2008
Messages: 217
Par défaut

j'ai rentré ce code
Code :
=IF(FIND(",";C7;1);LEFT(C7;FIND(",";C7;1)-1)&":"&RIGHT(C7;LEN(C7)-FIND(",";C7;1));"")
dans la cellule...
j'ai #NOM? en resultat..
j'ai vu que j'ai dit que j'éetais sous 2007, c'est une erreur je suis sous 2003 !!!
de plus je n'ai jamais vu de formule avec une fonction commencant par IF mais plutot SI...

ca ne marche pas...
Mais ya peut etre + simple... et peut etre une logique, plutot que d'essayer de compter les caractere pour faire de la recup..

si y a pas d'autre solution, je suis preneur...
biensur !
djoumusic est déconnecté   Envoyer un message privé Réponse avec citation
Vieux 09/02/2010, 12h39   #4
Rédacteur
 
Avatar de Ormonth
 
Nom : Didier GONARD
Date d'inscription: février 2008
Localisation: Nantes
Messages: 550
Par défaut

Bonjour,

Citation:
j'ai vu que j'ai dit que j'éetais sous 2007, c'est une erreur je suis sous 2003 !!!
tu dois avoir possibilité de modifier la balise sur ton message d'origine en tant que créateur...

sinon :

Code :
Sub Mutation()
Dim vnttbo_H1 As Variant
Dim dtm_H1 As Date
 
vnttbo_H1 = Split(Cells(5, 3), ",")
dtm_H1 = TimeSerial(vnttbo_H1(0), vnttbo_H1(1), 0)
Cells(5, 5) = dtm_H1 'cells(5,5) foramatée au préalable en heure 13:30
End Sub
cordialement,

Didier
Ormonth est déconnecté   Envoyer un message privé Réponse avec citation
Vieux 09/02/2010, 13h21   #5
Membre Confirmé
 
Date d'inscription: juin 2008
Messages: 217
Par défaut

en fait j'ai fait + simple,

j'ai multiplier la cellule par 100
pour 6,15 j'obtiens 615 et je met la cellule en type perso "0000" ce qui me donne "0600" ce qui me va tres bien !

mille merci quand même
c'est avec toutes les idées qu'on en créée d'autres...
djoumusic est déconnecté   Envoyer un message privé Réponse avec citation
NEWS EXCELF.A.Q EXCELTUTORIELS EXCELSOURCES EXCELOUTILS EXCELLIVRES EXCELOFFICE 2010

Réponse Proposer ce sujet en actualité

Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel



Outils de la discussion

Règles de messages
Vous ne pouvez pas créer de nouvelles discussions
Vous ne pouvez pas envoyer des réponses
Vous ne pouvez pas envoyer des pièces jointes
Vous ne pouvez pas modifier vos messages

Les balises BB sont activées : oui
Les smileys sont activés : oui
La balise [IMG] est activée : oui
Le code HTML peut être employé : non
Trackbacks are non
Pingbacks are non
Refbacks are non



Fuseau horaire GMT +1. Il est actuellement 21h12.


Vos questions techniques : forum d'entraide Excel - Publiez vos articles, tutoriels et cours
et rejoignez-nous dans l'équipe de rédaction du club d'entraide des développeurs francophones
Nous contacter - Hébergement - Participez - Copyright © 2000-2010 www.developpez.com - Legal informations.