Mise en forme cellule code postal

bonjour,

j'ai dans un fichier une colonne avec nom de commune et code postal.

je voudrais que dans chaque cellule le nom sous complètement à gauche et le code postal à droite.

j'avais réussi à écarter les 2 mais avec un nombre toujours égal d'espaces

ça ne doit pas être bien compliqué mais je n'y arrive pas!

d'avance merci

tiron

bonsoir,

via une formule

=GAUCHE(GAUCHE(A1;TROUVE("  ";A1)-1) & REPT(" ";30);30) & DROITE(A1;5)

il faut une police de caractères à taille fixe (courrier, fixed sys, ocr a extended , ...)

https://en.wikipedia.org/wiki/List_of_monospaced_typefaces

bonjour,

merci d'avoir pris du temps pour me répondre

dans cette solution le nombre d'espace entre la ville et le code postal est fixe.

du coup le code postal n'est pas forcement complètement à droite , cela dépend de la longueur du nom de la commune.

tiron

Bonjour,

le nombre d'espaces est bien variable.

Mais apparemment tu n'as pas lu ma réponse. il faut une police de caractères fixe pour que cela fonctionne

dsl effectivement j'avais omis ce détail qui n'en ai pas un!!

merci

tiron

Bonjour

tu peux aussi le faire avec une macro

A+

Maurice

Sub MiseForm()
Application.ScreenUpdating = False
   For Li = 1 To Range("A" & Rows.Count).End(xlUp).Row
      Tmp = ""
      Non = Application.Trim(Range("A" & Li).Value)
      T = Split(Non, " ")
      N = T(UBound(T))
         For L = 0 To UBound(T) - 1
            Tmp = Tmp & T(L) & " "
         Next
      For S = Len(Tmp) To 30
         Tmp = Tmp & " "
      Next
      Range("A" & Li).Value = Tmp & N
   Next
Columns(1).Font.Name = "Consolas"
End Sub

impec ça marche aussi très bien comme ça!

merci

tiron

Rechercher des sujets similaires à "mise forme code postal"