Discussion :

[John81]

Bonjour,

Je cherche à savoir comment faire pour concaténer un nom et une adresse dans une cellule sachant que l'adresse doit toujours commencer à la même position dans la cellule comme ci-après:

Jean Durand 5 rue Hoche
Jerome Petit 8 avenue Kleber

Exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim NOM,ADRESSE As string

Range ("A" & i).Value = NOM & "Nombre d'espaces" & ADRESSE

Sachant que l'adresse doit toujours commencer à la position 46 par rapport au 1er caractère de la cellule.

Merci de votre aide. John81

[Invité]

Bonsoir,

Essayez :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
lng = Len(nom)
Range("A1") = NOM & Space(45 - lng) & ADRESSE

[John81]

Merci becp jacques_jean ça marche. Bonne journée John81