Ajout de caractères différents avant une virgule dans excel
Résolu/Fermé
tibo20100
-
17 sept. 2013 à 18:31
ccm81 Messages postés 10904 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 décembre 2024 - 18 sept. 2013 à 14:32
ccm81 Messages postés 10904 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 décembre 2024 - 18 sept. 2013 à 14:32
A voir également:
- Ajout de caractères différents avant une virgule dans excel
- Caractères ascii - Guide
- Liste déroulante excel - Guide
- Déplacer une colonne excel - Guide
- Calculer une moyenne sur excel - Guide
- Aller à la ligne dans une cellule excel - Guide
5 réponses
ccm81
Messages postés
10904
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
24 décembre 2024
2 428
Modifié par ccm81 le 17/09/2013 à 18:58
Modifié par ccm81 le 17/09/2013 à 18:58
Bonjour,
Sans macro je ne vois pas (mais il y aura certainement des propositions)
avec macro
bonne suite
Sans macro je ne vois pas (mais il y aura certainement des propositions)
avec macro
Const premlettre = 65 ' lettre A ( 66 pour B, 67 pour C, etc ...)
Public Function AddLettre(s As String) As String
Dim pv As Long, nbv As Long
pv = InStr(1, s, ",")
nbv = 0
While pv <> 0
s = Left(s, pv - 1) & Chr(premlettre + nbv) & Right(s, Len(s) - pv + 1)
pv = InStr(pv + 2, s, ",")
nbv = nbv + 1
Wend
AddLettre = s & Chr(premlettre + nbv)
End Function
bonne suite
Merci beaucoup,
Malheureusement pour moi les macros ne sont bon qu'avec une sauce moutarde....
Je suis conscient que ce que je demande n'est pas simple mais c'est gentil à vous de m'avoir répondu aussi vite.
Cdt
Malheureusement pour moi les macros ne sont bon qu'avec une sauce moutarde....
Je suis conscient que ce que je demande n'est pas simple mais c'est gentil à vous de m'avoir répondu aussi vite.
Cdt
Gyrus
Messages postés
3334
Date d'inscription
samedi 20 juillet 2013
Statut
Membre
Dernière intervention
9 décembre 2016
524
Modifié par Gyrus le 17/09/2013 à 19:46
Modifié par Gyrus le 17/09/2013 à 19:46
Bonjour,
Avec le chiffre 51785962 dans la colonne A
Tu places en B1 la formule =A1 & CAR(LIGNE()+65)
puis tu copies vers le bas.
Ewemple
https://www.cjoint.com/?CIrtTxDY4Ph
A+
Avec le chiffre 51785962 dans la colonne A
Tu places en B1 la formule =A1 & CAR(LIGNE()+65)
puis tu copies vers le bas.
Ewemple
https://www.cjoint.com/?CIrtTxDY4Ph
A+
Gyrus
Messages postés
3334
Date d'inscription
samedi 20 juillet 2013
Statut
Membre
Dernière intervention
9 décembre 2016
524
17 sept. 2013 à 19:48
17 sept. 2013 à 19:48
Sans VBA, point de salut.
ccm81
Messages postés
10904
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
24 décembre 2024
2 428
17 sept. 2013 à 19:59
17 sept. 2013 à 19:59
Essaies avec ce fichier en exemple
https://www.cjoint.com/?3Irt6LbutWd
Bon courage
https://www.cjoint.com/?3Irt6LbutWd
Bon courage
ccm81
Messages postés
10904
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
24 décembre 2024
2 428
18 sept. 2013 à 14:32
18 sept. 2013 à 14:32
De rien,
Peux tu mettre le sujet à Résolu (en haut à gauche de ton premier message)
Bonne journée
Peux tu mettre le sujet à Résolu (en haut à gauche de ton premier message)
Bonne journée
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 418
Modifié par Vaucluse le 17/09/2013 à 20:02
Modifié par Vaucluse le 17/09/2013 à 20:02
Bonsoir
pour faire joujou sans VBA si vous avez le courage:
1°)Laisser une ligne d'entête au dessus du champ
2°)sélectionnez votre colonne, données / convertir / choisir séparateur la virgule
et convertir
vos chiffres se retrouvent dans des colonnes séparées, pour l'exemple de A à F à adapter
3°)Placer entête de chaque colonne la lettre que vous souhaitez ajouter suivie d'une virgule
4°)à partir de G2 la ,formule:
=SI(A2="";"";A2&A$1)
à tirer sur la largeur (donc G à K pour l'exemple) et hauteur utile
vous aurez vos chiffres suivis de la lettre et de la virgule dans les cellules e FàJ
5°) reste plus qu'à écrire en L la, formule:
=F1&G1&H1&I1&J1&K1
... et à faire un copier coller valeur de cette colonne pour supprimer les formules en gardant les résultats
amusez vous bien
crdlmnt
Errare humanum est, perseverare diabolicum
pour faire joujou sans VBA si vous avez le courage:
1°)Laisser une ligne d'entête au dessus du champ
2°)sélectionnez votre colonne, données / convertir / choisir séparateur la virgule
et convertir
vos chiffres se retrouvent dans des colonnes séparées, pour l'exemple de A à F à adapter
3°)Placer entête de chaque colonne la lettre que vous souhaitez ajouter suivie d'une virgule
4°)à partir de G2 la ,formule:
=SI(A2="";"";A2&A$1)
à tirer sur la largeur (donc G à K pour l'exemple) et hauteur utile
vous aurez vos chiffres suivis de la lettre et de la virgule dans les cellules e FàJ
5°) reste plus qu'à écrire en L la, formule:
=F1&G1&H1&I1&J1&K1
... et à faire un copier coller valeur de cette colonne pour supprimer les formules en gardant les résultats
amusez vous bien
crdlmnt
Errare humanum est, perseverare diabolicum