comment ajouter le même signe à la fin de toutes les cellulesz

6 réponses

danielle priou

05/08/2009 à 18:57

j'ai une liste de plusieurs centaines de cellules qui se suivent et je
voudrai ajouter à la fin de chaque ligne dans chaque cellule le signe ";"
sans avoir à le faire manuellement cellule par cellule

6 réponses

garnote

05/08/2009 à 19:05

Bonsoir Danielle,

Essaie cette macro :
Sub Ajout()
Dim c As Range
For Each c In Selection
c = c & ";"
Next c
End Sub

Serge

"danielle priou" <danielle a écrit dans le
message de news:

j'ai une liste de plusieurs centaines de cellules qui se suivent et je
voudrai ajouter à la fin de chaque ligne dans chaque cellule le signe ";"
sans avoir à le faire manuellement cellule par cellule

MichDenis

05/08/2009 à 20:13

Bonjour Garnote,

Et si des cellules contiennent plus d'une ligne ?

"garnote" a écrit dans le message de groupe de discussion :

Bonsoir Danielle,

Essaie cette macro :
Sub Ajout()
Dim c As Range
For Each c In Selection
c = c & ";"
Next c
End Sub

Serge

"danielle priou" <danielle a écrit dans le
message de news:

j'ai une liste de plusieurs centaines de cellules qui se suivent et je
voudrai ajouter à la fin de chaque ligne dans chaque cellule le signe ";"
sans avoir à le faire manuellement cellule par cellule

MichDenis

05/08/2009 à 20:14

Tu n'aurais pas un petit fichier pour nous Garnote,
illustrant ce que tu énonces ?

"garnote" a écrit dans le message de groupe de discussion :

Bonsoir Danielle,

Essaie cette macro :
Sub Ajout()
Dim c As Range
For Each c In Selection
c = c & ";"
Next c
End Sub

Serge

"danielle priou" <danielle a écrit dans le
message de news:

j'ai une liste de plusieurs centaines de cellules qui se suivent et je
voudrai ajouter à la fin de chaque ligne dans chaque cellule le signe ";"
sans avoir à le faire manuellement cellule par cellule

garnote

05/08/2009 à 20:57

Le ; se dépose au bout de la dernière ligne.

"MichDenis" a écrit dans le message de news:

Bonjour Garnote,

Et si des cellules contiennent plus d'une ligne ?

"garnote" a écrit dans le message de groupe de
discussion :

Bonsoir Danielle,

Essaie cette macro :
Sub Ajout()
Dim c As Range
For Each c In Selection
c = c & ";"
Next c
End Sub

Serge

"danielle priou" <danielle a écrit dans
le
message de news:
j'ai une liste de plusieurs centaines de cellules qui se suivent et je
voudrai ajouter à la fin de chaque ligne dans chaque cellule le signe ";"
sans avoir à le faire manuellement cellule par cellule

MichDenis

05/08/2009 à 21:11

| Le ; se dépose au bout de la dernière ligne.
*** ça je sais mais la demande était :
-> voudrai ajouter à la fin de chaque ligne dans chaque cellule le signe ";"

"MichDenis" a écrit dans le message de news:

Bonjour Garnote,

Et si des cellules contiennent plus d'une ligne ?

"garnote" a écrit dans le message de groupe de
discussion :

Bonsoir Danielle,

Essaie cette macro :
Sub Ajout()
Dim c As Range
For Each c In Selection
c = c & ";"
Next c
End Sub

Serge

"danielle priou" <danielle a écrit dans
le
message de news:
j'ai une liste de plusieurs centaines de cellules qui se suivent et je
voudrai ajouter à la fin de chaque ligne dans chaque cellule le signe ";"
sans avoir à le faire manuellement cellule par cellule

12/08/2009 à 15:19

Bonjour,

Sans macro, si tes données sont par exemple en A1:A25, saisir en B1
après avoir sélectionné B1:B25 :

=SUBSTITUE(A1:A25;A1:A25;A1:A25&";")
validation par Ctrl+Maj+Entrée

Tu peux ensuite copier/collage spécial (valeurs) B1:B25 sur lui-même
puis supprimer la colonne A.

Je fais le même pari que Serge (qu'il ne faut pas prendre au pied de la
lettre ta formulation "à la fin de chaque ligne").

FS
--
Frédéric SIGONNEAU
Modules et modèles pour Excel :
http://frederic.sigonneau.free.fr/

danielle priou a écrit :

j'ai une liste de plusieurs centaines de cellules qui se suivent et je
voudrai ajouter à la fin de chaque ligne dans chaque cellule le signe ";"
sans avoir à le faire manuellement cellule par cellule

comment ajouter le même signe à la fin de toutes les cellulesz

6 réponses

Veuillez sélectionner un problème