Copier le contenu de deux cellules +VBA [Résolu/Fermé]

Signaler
Messages postés
11
Date d'inscription
lundi 21 juillet 2008
Statut
Membre
Dernière intervention
7 août 2009
-
Messages postés
1
Date d'inscription
vendredi 9 septembre 2011
Statut
Membre
Dernière intervention
11 septembre 2011
-
Salut tout le monde,
Je voulé juste savoir comment copier le contenu de deux cellules dans une seule.
Le problème que je doit extraire le nom et le prénom des personnels et les mettre dans une seule cellule.
Merci d'avance pour vos réponses.
Cordialement

7 réponses

Messages postés
1669
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
179
bonjour.. tu n'a pas besoin de vba pour cela..

A1 = monnom
A2 = monprenom
A3 = (formule) =A1 & " " & B1

:)
1
Merci

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

CCM 60511 internautes nous ont dit merci ce mois-ci

Messages postés
11
Date d'inscription
lundi 21 juillet 2008
Statut
Membre
Dernière intervention
7 août 2009

mon G7 contient le nom, et le P7 contient le prenom
Je veux les fusionner
Dans B par exemple sachant que je manipule deux classeurs à la fois.

Sheets("Feuil1").Range("G7").Copy
ActiveSheet.Paste Range("B" & DerLig)
Sheets("Feuil1").Range("P7").Copy
ActiveSheet.Paste Range("C" & DerLig)
Messages postés
11
Date d'inscription
lundi 21 juillet 2008
Statut
Membre
Dernière intervention
7 août 2009

En fait jai un classeur qui contient la FEUil ou se trouve le nom et le prenom que je doit extraire.
Dans un autre classeur je doit coller ces deux informations dans la meme cellule et non pa comme jai fait une dans B et l'autre dans C
Messages postés
1669
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
179
re :)

tu dis que tu manipule 2 classeur à la fois, mais dans ton code là.. tu fait toujours référence à feuil1..y a t il 2 fichiers avec feuil1??

si c'est le meme fichier alors en B met "=g7 & " " & p7"
Messages postés
1669
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
179
'active ton classeur source
Nom=Sheets("Feuil1").Range("G7")
Prenom=Sheets("Feuil1").Range("P7")
'active ton classeur cible
Range("C" & DerLig) = Nom & " " & Prenom
Messages postés
11
Date d'inscription
lundi 21 juillet 2008
Statut
Membre
Dernière intervention
7 août 2009

Merci bcpp jsteing ça marche parfaitement :))
Messages postés
1669
Date d'inscription
vendredi 11 mai 2007
Statut
Contributeur
Dernière intervention
21 mai 2012
179
De rien :)
Messages postés
1
Date d'inscription
vendredi 9 septembre 2011
Statut
Membre
Dernière intervention
11 septembre 2011

Super c'est justement ce que je cherchais!
Merci