Les initales d'un nom

[Gysmo]

Bonjour

Est-ce qu'il y a un code VBA pour récupéré un nom dans une cellule et écrire les initiales dans une autre cellule

ex: a1 = Toto Gingras donc a2 = T.G.

Merci

 

[Brigitte]

Re : Les initales d'un nom

Bonsoir,

Avec une formule que j'ai :

En A3 : NOM Prénom

En B3 :
=GAUCHE(A3;1)&STXT(A3;CHERCHE(" ";A3)+1;1)

Je te laisse adapter pour rajouter les points, si tu y tiens ; la même en A7 (dans mon exemple)

=GAUCHE(A7;1)&"."&STXT(A7;CHERCHE(" ";A7)+1;1)&"."

 

[Gysmo]

Re : Les initales d'un nom

merci pour la réponse mais je ne crois pas que cette fonction soit reconnu dans une macro en VBA

Merci

 

[vbacrumble]

Re : Les initales d'un nom

Bonsoir tout le monde,



En VBA
GAUCHE=Left
STXT=Mid
CHERCHE=Instr

Donc il te suffit d'adapter la formule de Brigitte.

(ou utiliser fonction VBA personnalisée présente dans les archives du forum)

 

[Brigitte]

Re : Les initales d'un nom

Sorry, je n'avais pas compris que vba était une obligation, je préfère tellement les formules... encore qu'en ce moment, je nage dans les codes de toutes sortes et je m'y perds.

Edit : salut vbacrumble...

Pour illustrer le propos de vbacrumble, je te renvois vers ma bible : le site de jb :

http://boisgontierjacques.free.fr/ là tu vas sur tableur/accueil puis tu choisis chaines de caractères (vba)... et tu auras la traduc en vba de gauche, stxt... et des exemples

 

[Gysmo]

Re : Les initales d'un nom

Un gros merci pour votre aide !!!!!!!

Vous êtes super !!!!