Modifier une valeur de cellule en VBA

Bonjour à tous,

Voilà mon problème,

Je récupère une valeur qui vient se mettre dans une cellule par exemple la cellule "A1"

Cette valeur (qui n'est jamais la même) est de cette forme, par exemple : " 3500 mm² "

Je souhaiterai savoir quelle est la fonction qui permet de supprimer les "mm²" afin d'avoir dans ma cellule uniquement le chiffre "3500".

Pouvez m'aider ?

Merci en avance

Cordialement

Bonjour !

Par exemple en B1 : =CNUM(GAUCHE(A1;CHERCHE(" ";A1)))

Si c'est pour rester en A1, utiliser Convertir du menu Données …

bonjour,

Sub test()
[A1] = Val(" 3500 mm²")
End Sub

A+

Merci à vous 2 pour vos réponses.

J'ai finalement trouvé la solution à mon problème.

Je l'a met à disposition si cela peut servir.

Alors cette fonction permet de supprimer les 3 derniers caractères de ma cellule, ce qui me permet de supprimer l'unité "mm²"

Au lieu d'avoir initialement "3500mm²", j'ai "3500"

Cells(Ligne, Colonne) = Left(Cells(Ligne, Colonne), Len(Cells(Ligne, Colonne)) - 3)

Exemple appliqué à la cellule A2, on obtient :

Cells(2, 1) = Left(Cells(2, 1), Len(Cells(2, 1)) - 3)

A+