SUPPRIMER CARACTERES APRES LE 2E ESPACE EXCEL

Résolu
pygos Messages postés 202 Statut Membre -  
Polux31 Messages postés 7219 Statut Membre -
Bonjour,

J'ai besoin d'une macro qui supprime les caractères à partir du 2ème espace.

exemple :

14256 DUPONT Hector

deviendrait 14256 DUPONT

Merci d'avance,

Cordialement,

PYGOS

3 réponses

  1. Mytå Messages postés 4246 Date d'inscription   Statut Contributeur Dernière intervention   957
     
    Salut le forum

    Par formule, ca donnerait :

    =GAUCHE(C10;TROUVE(" ";C10;TROUVE(" ";C10)+1)-1)

    Mytå
    4
  2. pygos Messages postés 202 Statut Membre
     
    Que répondre ? Sinon que :

    MERCI !! & BRAVO !!

    Cordialement,

    Pygos
    0
    1. Polux31 Messages postés 7219 Statut Membre 1 204
       
      De rien

      Merci de mettre le post en résolu.

      Bonne continuation

      ;o)
      0
  3. Polux31 Messages postés 7219 Statut Membre 1 204
     
    Bonjour,

    Function troncMot(ByVal str As String)
    Dim c As String
    Dim i As Integer
    
        str = Trim(str)
        For i = Len(str) To 1 Step -1
            c = Mid(str, i, 1)
            If c = " " Then
                troncMot = Trim(Mid(str, 1, i))
                Exit Function
            End If
        Next i
    End Function


    ;o)
    -2