Isoler les N° d'une adresse

Bonjour,

Est ce que par le biais d'une formule on peut récupérer uniquement le N°d'une adresse sans la rue ?

En sachant que les Numéros sont toujous suivis d'un espace (uniquement un).

Voir fichier joint

merci d'avance et bon aprés midi

Bonjour

Avec une fonction personnalisée.

Place ce code dans un module :

Public Function TrouveChiffres(rCell As Range) As Variant
    Dim intCar As Integer

    TrouveChiffres = ""
    If rCell = "" Then Exit Function

    ' Boucle sur les caractères
    For intCar = 1 To Len(rCell.Value)
        If IsNumeric(Mid(rCell.Value, intCar, 1)) Then TrouveChiffres = TrouveChiffres + Mid(rCell.Value, intCar, 1)
    Next intCar

End Function

Puis, en B1 :

=TrouveChiffres(A1)

Formule à tirer vers le bas

Amicalement

Nad

Bonjour

Un essai avec une formule

En B1

=SI(ESTERREUR(CNUM(GAUCHE(A1;TROUVE(" ";A1))));"";CNUM(GAUCHE(A1;TROUVE(" ";A1))))

A tirer vers le bas

Contrainte : Le numéro doit être au début