Bonjour,

dans mon programme j'ai besoin d'extraire uniquement le chiffre contenu dans une cellule qui elle contient lettres et chiffres.

voici comment je procède :

Je fait une boucle pour "scanner" les cellules en question et j'applique cette formule :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
pos = InStr(Range("N" & j).Value, i)
 
            If pos > 0 Then
 
            contenu = Range("N" & j).Value
            pos2 = Mid(contenu, pos, 1)
 
            End If
celà fonctionne bien pour un chiffre de 1 à 9, pos2 me renvoi le bon chiffre mais lorsque j'ai 10 dans la cellule scannée, le prgomme prends également le 1..

Auriez-vous une astuce?

Merci!