A voir également:
- Macro excel h mn s
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Si ou excel - Guide
- Déplacer colonne excel - Guide
8 réponses
par nombre tu veu plutot dire un datetime ?
tu peu utiliser hour, minute,second pour traiter les différentes partie (tape datetime dans l'explorateur d'objet)
tu peu utiliser hour, minute,second pour traiter les différentes partie (tape datetime dans l'explorateur d'objet)
non pas forcément!
Sub test()
x = CDate("03:21:52") ' une heure
y = 12.5 ' un chifre à virgule
Z = CDate(1 / 3 / 2010) 'une date
i = CStr(x) ' unechaine ....
j = CStr(y)
k = CStr(Z)
End Sub
Sub test()
x = CDate("03:21:52") ' une heure
y = 12.5 ' un chifre à virgule
Z = CDate(1 / 3 / 2010) 'une date
i = CStr(x) ' unechaine ....
j = CStr(y)
k = CStr(Z)
End Sub
Peux-tu nous montrer ton code et le contenu de ta chaine?
Est-ce bien une chaine?
quel est ton besoin?
Est-ce bien une chaine?
quel est ton besoin?
Le pb est bien là je le crains, et je le dis depuis le début, il s'agit d'un niombre qui est 01:32:14 , que je veux trasformer en chaîne pour pouvoir isoler 01, et 32, et 14.
Je pense que si mon 01:32:14 est trransformé en chaîne, right(de ma chaîne,2) et left(de ma chaîne,2), pourront s'écire 14 et 01...
Je pense que si mon 01:32:14 est trransformé en chaîne, right(de ma chaîne,2) et left(de ma chaîne,2), pourront s'écire 14 et 01...
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Sub Change_Heure()
Dim x As Date
Dim MaChaine As String
Dim ChaineHeure As String
Dim chaineMinute As String
Dim chaineSeconde As String
' en B2 j'ai 01:34:14 une heure
x = Range("B2").Value
MaChaine = CStr(x)
ChaineHeure = Left(MaChaine, 2) ' contient "01"
chaineMinute = Mid(MaChaine, 4, 2) ' contient "32"
chaineSeconde = Right(MaChaine, 2) ' contient "14"
End Sub
Dim x As Date
Dim MaChaine As String
Dim ChaineHeure As String
Dim chaineMinute As String
Dim chaineSeconde As String
' en B2 j'ai 01:34:14 une heure
x = Range("B2").Value
MaChaine = CStr(x)
ChaineHeure = Left(MaChaine, 2) ' contient "01"
chaineMinute = Mid(MaChaine, 4, 2) ' contient "32"
chaineSeconde = Right(MaChaine, 2) ' contient "14"
End Sub
bon ben je me répète :)
ce que tu veu manipuler est un type datetime (ou date si tu préfère) tu peux donc utiliser les fonctions hour, minute, second pour extraire les parties souhaité (et là ya pas besoin d'utiliser mid pour traiter une chaine), encore faudrai il que la variable contenant ton heure soit bien du type date
ce que tu veu manipuler est un type datetime (ou date si tu préfère) tu peux donc utiliser les fonctions hour, minute, second pour extraire les parties souhaité (et là ya pas besoin d'utiliser mid pour traiter une chaine), encore faudrai il que la variable contenant ton heure soit bien du type date
