Unir 2 cellules dans une seule
Résolu
Philou73CH
-
Philou73CH -
Philou73CH -
bonjour / Bonsoir
A l'aide d'une macro, je reporte des cellules pour compléter automatiquement des identités.
Et je me retrouve avec le soucis suivant :
Dans le tableau de base, j'ai une collone pour les numéros postaux(NPA). Puis une autre collone pour les localités. J'ai fait cela car j'ai un tableau de donnée et le NPA permet de sélectionner le village.
Mais où tout se complique c'est que dans le tableau final, j'aimerai pouvoir mettre le NPA et la localité dans une et même cellule.
Est-ce possible ????? Et si oui comment le faire ???
Merci à vous pour votre aide qui m'est très très précieuse.
A l'aide d'une macro, je reporte des cellules pour compléter automatiquement des identités.
Et je me retrouve avec le soucis suivant :
Dans le tableau de base, j'ai une collone pour les numéros postaux(NPA). Puis une autre collone pour les localités. J'ai fait cela car j'ai un tableau de donnée et le NPA permet de sélectionner le village.
Mais où tout se complique c'est que dans le tableau final, j'aimerai pouvoir mettre le NPA et la localité dans une et même cellule.
Est-ce possible ????? Et si oui comment le faire ???
Merci à vous pour votre aide qui m'est très très précieuse.
A voir également:
- Unir 2 cellules dans une seule
- Supercopier 2 - Télécharger - Gestion de fichiers
- Comment imprimer un tableau excel sur une seule page - Guide
- Fusionner 2 cellules excel - Guide
- Word 2 colonnes sur une seule page - Guide
- Verrouiller cellules excel - Guide
2 réponses
Bonjour,
oui c'est possible, mais pour l'intégrer dans ton code il faudrait le connaitre ou avoir ton fichier que tu peux joindre avec ce lien
https://www.cjoint.com/
oui c'est possible, mais pour l'intégrer dans ton code il faudrait le connaitre ou avoir ton fichier que tu peux joindre avec ce lien
https://www.cjoint.com/
Re,
remplace tout le code que tu as mis dans le post précédent par cette simple ligne
Sheets("InfoPt").[B9] = Sheets("Présentation Identitées").[F2] & " " & Sheets("Présentation Identitées").[G2]
s'il y a disfonctionnement joint ton fichier dans un prochain post
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
remplace tout le code que tu as mis dans le post précédent par cette simple ligne
Sheets("InfoPt").[B9] = Sheets("Présentation Identitées").[F2] & " " & Sheets("Présentation Identitées").[G2]
s'il y a disfonctionnement joint ton fichier dans un prochain post
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
Oups, là, j'ai fauté, de ne pas mettre à disposition l'un ou l'autre.
Ferai cela ce soir dès mon retour au travail.
Merci à vous
Sheets("Présentation Identitées").Select
Range("F2:G2").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("InfoPt").Select
Range("B9").Select
ActiveSheet.Paste
Je reste ouvert à vous pour plus d'info. Sachez que j'ai fait comme cela, car mon code initiale et long.
Mais merci à vous d'avance pour tout ce que vous faite pour les débutants.