OVH Cloud OVH Cloud

Compléter une chaîne

6 réponses
Avatar
Joel
Bonjour à tous.

Dans un ensemble de cellules, situées dans la même colonne, comment
ajouter deux caractères (toujours les mêmes) au début du contenu de
chaque cellule ?

Comme il y a plusieurs centaines de cellules, je préférerais ne pas le
faire à la main !

Ce sont des chiffres, mais au format texte (je n'ai pas besoin de
calculs).

Il s'agit de dates (année seule) : les cellules ne contiennent que les
2 derniers chiffres des années, je voudrais ajouter "19" devant (pour
que "74" devienne "1974", par exemple).

Merci d'avance pour votre aide.

BJ

6 réponses

Avatar
Rouch
Bonjour,
Si tu souhaite toujours rajouter la même chaine tu peux utiliser le
format spécial:

Format / Cellules / Personnalisé:
Si le contenu de cellule est en texte : "19"@
Si le contenu de cellule est un chiffre"19"#0 ou "19"00 si tu souhaites
4 chiffres

@+


Joel a exposé le 03/10/2004 :
Bonjour à tous.

Dans un ensemble de cellules, situées dans la même colonne, comment
ajouter deux caractères (toujours les mêmes) au début du contenu de
chaque cellule ?

Comme il y a plusieurs centaines de cellules, je préférerais ne pas le
faire à la main !

Ce sont des chiffres, mais au format texte (je n'ai pas besoin de
calculs).

Il s'agit de dates (année seule) : les cellules ne contiennent que les
2 derniers chiffres des années, je voudrais ajouter "19" devant (pour
que "74" devienne "1974", par exemple).

Merci d'avance pour votre aide.

BJ


Avatar
Frédéric Sigonneau
Bonjour,

Essaye cette petite macro (plage de cellule à traiter à adapter) :

Sub Macro19()
Dim cell As Range
For Each cell In Range("A1:A50") 'par exemple
cell.Value = "19" & cell.Text
Next cell
End Sub

FS
---
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://frederic.sigonneau.free.fr
Si votre question sur Excel est urgente, évitez ma bal !

Bonjour à tous.

Dans un ensemble de cellules, situées dans la même colonne, comment
ajouter deux caractères (toujours les mêmes) au début du contenu de
chaque cellule ?

Comme il y a plusieurs centaines de cellules, je préférerais ne pas le
faire à la main !

Ce sont des chiffres, mais au format texte (je n'ai pas besoin de
calculs).

Il s'agit de dates (année seule) : les cellules ne contiennent que les
2 derniers chiffres des années, je voudrais ajouter "19" devant (pour
que "74" devienne "1974", par exemple).

Merci d'avance pour votre aide.

BJ




Avatar
Claude Trouet
Ecrire la formule suivante dans la colonne de droite de la cellule contenant
la date au format AA
ça teste si la cellule est vide et si ce n'est pas le cas ajoute 19 devant
le nombre

=SI(ESTVIDE(C3);"";"19"&C3)
et la recopier devant toutes les autres

C'est OK ?
Cordialement
CT

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

Bonjour à tous.

Dans un ensemble de cellules, situées dans la même colonne, comment
ajouter deux caractères (toujours les mêmes) au début du contenu de
chaque cellule ?

Comme il y a plusieurs centaines de cellules, je préférerais ne pas le
faire à la main !

Ce sont des chiffres, mais au format texte (je n'ai pas besoin de
calculs).

Il s'agit de dates (année seule) : les cellules ne contiennent que les
2 derniers chiffres des années, je voudrais ajouter "19" devant (pour
que "74" devienne "1974", par exemple).

Merci d'avance pour votre aide.

BJ




Avatar
Philippe.R
Bonjour Joël,
Si tu as vraiment besoin de 4 chiffres et pas seulement de l'apparence de 4 chiffres, tu peux utiliser,
dans une colonne ajoutée provisoirement(supposée en B avec des données en A pour l'exemple), la formule
:
="19"&"A1 à recopier vers le bas, puis sélection de la colonne B, copier, sélection de la colonne A,
collage spécial / valeurs, puis suppression de la colonne B.
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.

"Joel" a écrit dans le message de
news:
Bonjour à tous.

Dans un ensemble de cellules, situées dans la même colonne, comment
ajouter deux caractères (toujours les mêmes) au début du contenu de
chaque cellule ?

Comme il y a plusieurs centaines de cellules, je préférerais ne pas le
faire à la main !

Ce sont des chiffres, mais au format texte (je n'ai pas besoin de
calculs).

Il s'agit de dates (année seule) : les cellules ne contiennent que les
2 derniers chiffres des années, je voudrais ajouter "19" devant (pour
que "74" devienne "1974", par exemple).

Merci d'avance pour votre aide.

BJ




Avatar
LeSteph
Bonjour Joel,
dans un module:
'****
Sub Ajtcar()
Dim mescar as string
Dim c as range
mescar =inputbox("entrer le préfixe","insertion de caractères")
For each c in selection.cells
if c<>"" then c.value=mescar & c.value
next
end sub
'****

'lSteph
"Joel" a écrit dans le message de news:

Bonjour à tous.

Dans un ensemble de cellules, situées dans la même colonne, comment
ajouter deux caractères (toujours les mêmes) au début du contenu de
chaque cellule ?

Comme il y a plusieurs centaines de cellules, je préférerais ne pas le
faire à la main !

Ce sont des chiffres, mais au format texte (je n'ai pas besoin de
calculs).

Il s'agit de dates (année seule) : les cellules ne contiennent que les
2 derniers chiffres des années, je voudrais ajouter "19" devant (pour
que "74" devienne "1974", par exemple).

Merci d'avance pour votre aide.

BJ




Avatar
Joel Surcouf
Merci à tous ceux qui m'ont apporté si vite
plusieurs solutions différentes pour répondre
à la question posée !

Grâce à vos lumières, les chaînes de mes tableaux
se sont complétées comme par magie en quelques secondes...

Merci pour le temps gagné.

Joël.