Probleme extraction d'un string macro

[evzone]

Bonjour,

Voila je travaille en ce moment sur un fichier de 30000 lignes... Je dois donc ecrire une macro .

Dans la cellule B81, on trouve le temps sous forme h:m:s : Par exemple 17:50:22
Apres un typename il s avere que c est une chaine de caractere. Ce que je dois faire c est extraire les minutes dans la cellule O81 pour avoir 50 puis le convertir.
Pour ce faire j essaie d utiliser un Mid(B81,4,2) mais rien est extrait, j'obtiens une chaine vide...

 

[Robert]

Re : Probleme extraction d'un string macro

Bonjour Evzone, bonjour le forum,

Peut-être comme ça :

Mid(Range("B81"),4,2)

ou comme ça :

Split(Range("B81"),":",-1)(1)

 

[evzone]

Re : Probleme extraction d'un string macro

Bonjour Robert et merci pour ton aide,

J ai fait comme ca (et cela revient au meme que ce que tu me proposes):

str = Range("B81").Value
Cells(81, 15) = Mid(str, 4, 2)

Le probleme est que cela me retourne un str = 37
alors que dans mon B81 j ai 17:42:22

D ailleurs quand je mets la valeur de ma cellule dans une variable de type string j obtiens 0,737 pour 17:42:22... La fonction mid fonctionne tres bien. Le probleme vient du fait que je n arrive pas a recuperer la valeur de ma cellule...

 

[Robert]

Re : Probleme extraction d'un string macro

Bonjour Evzone, bonjour le forum,

Essaie ça, tu verras si c'est vraiment pareil...

dim str As String
str = CStr(Range("B81").value)
MsgBox str

 

[evzone]

Re : Probleme extraction d'un string macro

Oui Robert cela retourne la meme chose a savoir 0,737...

Le probleme vient peut etre Range("B81").Value . en effet j ai teste avec une vrai chaine de caractere et VB me renvoit une erreur 1004...

La je ne comprends absolument plus, quand je fais un MsgBox (Cells(81, 2)) Excel m affiche 0,737 et non pas 17:42:22...

 

[evzone]

Re : Probleme extraction d'un string macro

Il suffisait d utiliser la fonction minute... Mais bon le typename retournait "string"...
En tout cas merci Robert pour ton aide
Bye

 

[Robert]

Re : Probleme extraction d'un string macro

Bonjour Evzone, bonjour le forum,

Comme je ne sais pas ce qu'est le typename je pensais que tu avais bel et bien du texte dans la cellule et j'avais fait un essai avec du texte qui marchait correctement. Évidemment, si c'était un temps ça ne pouvait pas marcher...