CONCATENANTION DE DEUX CELLULES EXCEL [Résolu]

Messages postés
231
Date d'inscription
mercredi 27 avril 2005
Statut
Membre
Dernière intervention
10 juin 2009
- - Dernière réponse : MAXIMO71
Messages postés
46
Date d'inscription
samedi 25 mars 2006
Statut
Membre
Dernière intervention
7 juin 2007
- 6 juin 2007 à 20:26
Bonsoir,
je veux faire un programme en vba qui lit le contenue d'une cellules A et puis il rajour a la valeur de cette cellules des chiifres. exemple
cellule de depart
celle (2,2)= 1111

le resultat que je veux
celle(2,2)=001111

pour cela j'ai essayé le &
Cells(2, 2) = "00" & Cells(2, 2)
mais dans la cellule excel il me donne une erreur #NOM
j'ai essayé aussi
Cells(2, 2) = concatener("00", Cells(2, 2))
et il me donne une erreur de compilation.

programation .....
Afficher la suite 

4 réponses

Meilleure réponse
Messages postés
381
Date d'inscription
vendredi 24 septembre 2004
Statut
Membre
Dernière intervention
5 septembre 2010
2
3
Merci
Sinon tu peux faire comme ça : (pour être sure de convertir en chaine de caractère)
ActiveCell = CStr(Cells(1, 1)) & CStr(Cells(2, 1))

 Fiko ;-)

La reponse vous convient pensez > Accepter < <hr />

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 141 internautes nous ont dit merci ce mois-ci

Commenter la réponse de fiko81
Messages postés
381
Date d'inscription
vendredi 24 septembre 2004
Statut
Membre
Dernière intervention
5 septembre 2010
2
0
Merci
Salut,
Tu n'es pas obligé de passer par VBA : sous excel la fonction CONCATENER marche bien

 Fiko ;-)

La reponse vous convient pensez > Accepter < <hr />
Commenter la réponse de fiko81
Messages postés
231
Date d'inscription
mercredi 27 avril 2005
Statut
Membre
Dernière intervention
10 juin 2009
0
Merci
si
il me donne
cette formule
ActiveCell.FormulaR1C1 = "=CONCATENATE(RC[-1],R[1]C[-1])"
lorsque je l'ai essayé dans mon programme il met dans le cellule excel le mot =CONCATENATE(RC[-1],R[1]C[-1]). parsqu'il considère que les caractères entre les "" un texte.

programation .....
Commenter la réponse de h_adil
Messages postés
46
Date d'inscription
samedi 25 mars 2006
Statut
Membre
Dernière intervention
7 juin 2007
0
Merci
Je pense te ton code ne comprend pas ce que tu souhaite faire

Cells(2,2).Text ou .Value = "00" & Cells(2,2).Text ou .Value

En effet tu ne peux pas concaténer des Valeurs numérique avec des chaines de caractères. De plus si tes valeurs de départ son des numériques, il ne le seront plus après.

Si tu souhaite conserver des valeurs numériques utilise Format(Cells(2,2).Value, "00000")

MAXIMO71
PS Si la réponse vous satistait
pensez à la valider
Commenter la réponse de MAXIMO71