problème pour remplacer un caractère ( peut etre ASCII ) (code vba )

[fifi56]

bonjour

ci joint un fichier
je cherche a extraire d'une cellule une date et un temps
( le tps est exprimer en minute , seconde et centièmes )

mais je n'arrive pas a convertir mes données en tps reconnu par excel peut etre il s'agit d'un caractère ascii ???


merci d'avance pour votre aide

 

[Dranreb]

Re : problème pour remplacer un caractère ( peut etre ASCII ) (code vba )

Bonjour.

La macro :

Sub Macro1()
Dim TSpl$(), D As Date, H#
TSpl = Split(Range("a3"), "-")
D = Split(Trim$(TSpl(1)), " ")(0)
H = TimeValue(Replace(Replace(TSpl(0), "''", ":"), "'", ":"))
[B2] = H
[B3] = D
End Sub

Mais on devrait y arriver avec des formules.

=SUBSTITUE(SUBSTITUE(GAUCHE(A3;CHERCHE(" ";A3)-1);"''";":");"'";":")+0

avec format d'heure,

=STXT(A3;CHERCHE("-";A3)+2;8)+0

avec format de date.

 

[fifi56]

Re : problème pour remplacer un caractère ( peut etre ASCII ) (code vba )

merci ca fonctionne a merveille