Fonction ou code pour coller une plage à la suite Résolu/Fermé

Question

Bonjour,

Je souhaite copier & coller, de façon automatique lors du déclenchement d'une macro, une plage de caractères contenue dans la feuille 1, directement, à la suite de la plage de caractère dans la feuille 2.

Evidemment, les plages ne sont jamais les mêmes, notamment en ce qui concerne le nombre de lignes.
Pour sélectionner et copier  la plage de la feuille 1, quelque soit le nombre de ligne, pas de problème, mais pour ce qui est de la coller à la suite de la plage contenue dans la feuille 2, c'est plus compliqué (enfin pour moi :-) )

Merci d'avance pour vos suggestions...

Cdlt,
Gexelpa

via55 · Answer

Bonjour

Tu peux facilement trouver la 1ere ligne vide d'une colonne avec une instruction telle que 
Ligne = Sheets("Feuil2").Columns(1).Find("*", , , , xlByColumns, xlPrevious).Row + 1
 Ensuite il reste plus qu'à se positionner sur la bonne cellule pour coller la plage

Cdlmnt
Via

via55 · Answer

Re

Il faut selectionner la cellule de la bonne ligne avant de coller comme je disais précédemment

Avant Selection. Paste mettre cette ligne
Sheets("Feuil2").Range("A" & ligne).Select
Cdlmnt
Via

Fonction ou code pour coller une plage à la suite

2 réponses

Discussions similaires