XL 2019 Trouver 1ère lettre et remplacer

julien5521

XLDnaute Nouveau
Bonjour je cherche une formule ou une macro qui permet de trouver la 1ere lettre dans une celulle et la remplacer par un espace ou un caractère commun

Exemple
2215.21Fer
00212Magn
55631Xevc

Ce qui donnerais

2215.21 Fer
00212 Magn
55631 Xevc

Merci ;=
 

R@chid

XLDnaute Barbatruc
Bonjour cher Job75,
Voyez le fichier joint avec la liste des "lettres" en colonne F et cette formule matricielle en B2 :
Code:
=REMPLACER(A2;PETITE.VALEUR(SI(NB.SI(F:F;STXT(A2;LIGNE(INDIRECT("1:"&NBCAR(A2)));1));LIGNE(INDIRECT("1:"&NBCAR(A2))));1);1;" "&STXT(A2;PETITE.VALEUR(SI(NB.SI(F$2:F$127;STXT(A2;LIGNE(INDIRECT("1:"&NBCAR(A2)));1));LIGNE(INDIRECT("1:"&NBCAR(A2))));1);1))
à valider par Ctrl+Maj+Entrée.

La 1ère lettre peut être majuscule ou minuscule, accentuée ou non.

A+
On peut écrire ta formule comme ça :
VB:
=REMPLACER(A2;EQUIV(VRAI;NB.SI(F$2:F$127;STXT(A2;LIGNE(INDIRECT("1:"&NBCAR(A2)));1))>0;0);;" ")
@ valider toujours par Ctrl+Maj+Entrée

Cordialement
 

Discussions similaires

Réponses
1
Affichages
167
  • Question
XL pour MAC mise en forme
Réponses
2
Affichages
97

Membres actuellement en ligne

Statistiques des forums

Discussions
312 165
Messages
2 085 882
Membres
103 011
dernier inscrit
rine