Format personnalisé pour un texte

filiph79

XLDnaute Occasionnel
Bonjour,

je souhaite transformer 111222333A44 en 111 222 333 A44;

je sais le faire en réalisant une formule dans une cellule adjacente du type :
=GAUCHE(A1;3)&" "&STXT(A1;4;3)&" "&STXT(A1;7;3)&" "&DROITE(A1;3), avec 111222333A44 en A1
mais je souhaiterai le faire directement sur la formule saisie via un format personnalisé.

Le A dans le code fait que cette valeur est considérée comme du texte et je n'arrive pas a créer le code de format personnalisé.

le code serait 111222333444 je ferai un format personnalisé du type 000 000 000 000 .

Comment faire la même chose avec du texte ?

cordialement

Philippe
 

gilbert_RGI

XLDnaute Barbatruc
Bonjour,

peut-être avec cette petite fonction perso

VB:
Function tx(range)
    lg = Len(range)
    a = 3: b = 1
    For i = 3 To lg Step 3
        rg = rg + Mid(range, b, a) + " "
        b = b + 3
    Next
    If lg Mod 3 <> 0 Then rg = rg + Right(range, lg Mod 3)
    tx = rg
End Function
 

Pièces jointes

  • separation de caracteres.xlsm
    14.2 KB · Affichages: 40

Discussions similaires

Statistiques des forums

Discussions
311 724
Messages
2 081 936
Membres
101 844
dernier inscrit
pktla