Insérer un "_"

[sonskriverez]

Bonjour le forum,

J'ai une liste de prénom dans une colonne du style :

Jacques
Pierre
Jean Pierre
Jean claude

Je voudrais mettre un "_" entre les prénom composés par ex : Jean_Claude

Une macro serait parfaite

Merci de votre aide

 

[Pierrot93]

Re : Insérer un "_"

Bonjour Sonskirev

essaye le code ci dessous :

Range("A1:A4").Replace " ", "-"

bon après midi
@+

 

[sonskriverez]

Re : Insérer un "_"

C'est pas bon car c'est toute la cellule qui est remplie, il faut juste un "_" entre les prénoms

 

[pierrejean]

Re : Insérer un "_"

bonjour sonskrieverez

avec:

Range("A1") = Replace(Trim(Range("A1")), " ", "_")

les espaces avant et apres seront suprimé avant remplacement de l'espace intermediaire par _

si plus complexe donner des exemples plus explicites

 

[sonskriverez]

Re : Insérer un "_"

Bonjour Pierrejean,

Merci de ton aide mais j'ai toute une colonne à modifier sans forcement en connaitre la dernière ligne.

As-tu le code qui va bien ?

 

[pierzi]

Re : Insérer un "_"

Bonjour Pierrejean,

Merci de ton aide mais j'ai toute une colonne à modifier sans forcement en connaitre la dernière ligne.

As-tu le code qui va bien ?

Utilise la combinaison touche :ctrl h (recherche remplace)
au préalable comme excel ne reconnait pas dans cette recherche le " " selectionne une cellule dans laquelle figure un blanc tape f2 pour entrer dans le texte et copie le caractère blanc (raccourci ctrl c), puis sélectionne la colonne ou la plage de cellules concernée, tape : ctrl h, dans la boite de dialogue champ rechercher copie le caractère copié (raccourci ctr v) dans le champ remplacer tape le carctère tiret : - pour tester click sur suivant puis remplacer, si satisfaisant, click sur remplacer tout.

 

[pierrejean]

Re : Insérer un "_"

re

for n=1 to range("A65536").end(xlup).row
  Range("A" & n) = Replace(Trim(Range("A" & n )), " ", "_")
next n

 

[sonskriverez]

Re : Insérer un "_"

Super Pierre Jean merci de ton aide

 

[DIGGERJACK]

Re : Insérer un "_"

Bonsoir le forum

Une solution sans macro

Prénom en colonne A

Formule en colonne B =SUBSTITUE(A1;"";"_") et
Jean Claude devient Jean_Claude

Formule que m'a fourni Pascal76 ce matin
Bonne soirée
Diggerjack

 

[sonskriverez]

Re : Insérer un "_"

Merci DIGGERJACK

juste une petite erreur dans ta formule il y a un espace entre ""

B =SUBSTITUE(A1;" ";"_")

et merci à Pascal76

 

[DIGGERJACK]

Re : Insérer un "_"

Re

Effectivement il manquait un espace entre les ""
Merci d'avoir rectifier la chose
Bonne soirée
Diggerjack