Excel - concaténer avec une initiale de mot

Sawadee -  
smartway14 Messages postés 857 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai dans excel une liste de noms de famille, et en vis a vis la liste des prénoms de ces personnes

je cherche à trouver la formule pour concaténer les 2 (nom + prénom ) de façon à ce que ça s'affiche comme ceci : A.Dupond, c'est-à-dire que j'obtienne l'initiale du prénom, puis un point, puis le nom de famille.

Est ce possible? Si oui comment? Merci!
Configuration: Windows XP
Firefox 3.0.10

7 réponses

  1.
    michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    bonjour

    le prénom en B1
    le nom en A1
    =MAJUSCULE(GAUCHE(B1;1))&". "&A1
    2
  2. smartway14 Messages postés 857 Date d'inscription   Statut Membre Dernière intervention   186
     
    bonjour;
    on supose que le nom est das A1 et le prénom est dans B1,dans une autre cellule tapez la formule suivante:
    =CONCATENER(MAJESCULE(GAUCHE(A1;1));".";B2)
    0
  3. smartway14 Messages postés 857 Date d'inscription   Statut Membre Dernière intervention   186
     
    ou encore:
    =CONCATENER(GAUCHE(NOMPROPRE(A1);1);".";B1)
    0
  4. qmike Messages postés 1599 Date d'inscription   Statut Membre Dernière intervention   594
     
    bonjour
    Oui ou encore la
    http://bvrve.club.fr/Astuces_Michel/239excel.html
    bonne journée
    0

  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    y'a la sréréo, aujourd'hui ?
    0
  7. qmike Messages postés 1599 Date d'inscription   Statut Membre Dernière intervention   594
     
    Y'a la sréréo, aujourd'hui ?
    ?????????????????????????????????????????????????
    0
  8. smartway14 Messages postés 857 Date d'inscription   Statut Membre Dernière intervention   186
     
    ou par ce macro:
    Sub cocatener()
    Range("B2")=Left(Ucase(Range("A1")),1)&"."&Range("B1")
    End Sub
    0