Changer le format de la cellule

[Les2A]

Bonjour tout le monde,

Je dois faire des tests du genre : regarder si le premier character est 1 ou pas, dans un fichier excel. En fait mon macro est bien écrit mais ça ne marche que si le format des cellules est "texte", parce que j'utilise Range("A1").Characters(1,1).Texte = "1" etc pour faire mes tests...

Mais maintenant on m'a donné un fichier Excel de 1200 lignes mais qui contient des colonnes de format "standard". et là mon programme ne marche plus... Quand je change le format de la cellule à la main, rien ne change, il faut carrément retaper le contenu de la cellule après avoir changé le format!!

Comment je peux gérer ce problème?

Merci beaucoup pour vos aides

Bonne journée

Les2A

 

[sousou]

Bonjour les2A

Il existe dans VB deux instructions qui doivent t'aiser.

Val (chaine de caractère) qui renvoi un nombre
str(nombre) qui renvoie une chaine

Quelque chose comme cela devrait te sortir de là.
If IsNumeric(ActiveCell.Value) = True Then madonnées = Str(ActiveCell)