Format de cellule personnalisé
ZEZETTEBULL -  
Bonjour,

En cet période de confinement, je fais des recommandés en ligne à la pelle via LaPoste.
Afin de gagner du temps, je cherche à mettre en forme, automatiquement, leur n° d'accusé réception au format : xx xxx xxx xxxx x (qui contient 1 lettre)
J'ai essayé la méthode : Format de cellule -> Personnalisée, etc. mais je n'y arrive pas.

Merci d'avance pour votre aide.

2 réponses

  1.  eriiic Contributeur
    Bonjour,

    avec une petite macro qui contrôle la validité de la saisie avant.
    Ici supervision de la colonne B : 
    Private Sub Worksheet_Change(ByVal Target As Range)
    Dim s As String
    If Target.Column = 2 Then 'colonne B then
        s = UCase(Target)
        If s Like "#[A-Z]###########" Then Target = Left(s, 2) & " " & Format(Mid(s, 3), "000 000 0000 0")
    End If
End Sub

    https://www.cjoint.com/c/JCEhvTrDCAV
    eric
    2
    1. ZEZETTEBULL Auteur
      Eriic,
      Merci pour ta réponse, c'est exactement ce que je cherche.
      Je ne sais juste pas faire de macro... et je ne vais pas te demander un cours express !
      Je vais m'y mettre...
      Merci encore !
      Bon confinement.
      0
    2. eriiic Contributeur
      @ZEZETTEBULLBonjour,
      Tu aurais pu te raser la moustache pour ta photo de profil :-)
      Et sans doute que M-12 aurait apprécié un merci également...
      eric
      0
  2. M-12
    Bonjour,
    par le format personnalisé, je ne pense pas que cela soit possible
    par une formule dans une colonne intermédiaire avec pour l'exemple le N° en A1 

    =GAUCHE(A1;2)&" "&STXT(A1;3;3)&" "&STXT(A1;6;3)&" "&STXT(A1;10;4)&" "&DROITE(A1;1)
    1