OVH Cloud OVH Cloud

copie ligne

6 réponses
Avatar
Angela
Bonjour a tous,
Je voudrai copier certain elements d'un tableau (Dont le contenu n'est
jamais le meme) a la fin d'un autre.
Il parait qu'il existe un fonction qui me permettrait de dire un truc su
genre :"Tant que les lignes de mon tableau 1 sont differentes de vide copie
telle et telle cellules a la fin du tableau 2".
Quelqu'un connaitrait il cette fonction miracle???:)))
Merci beaucoup d'avance

6 réponses

Avatar
...Patrick
Salut Angela,
tu peux te baser sur ceci pour copier ton tableau à la fin de ton onglet 2.

Range("A2").Activate ' dans le tableau de départ
Selection.CurrentRegion.Select
Set rng1 = Selection
rng1.Copy Destination:=Sheets(2).Range("a65536").End(xlUp)(2) ' copie à la
dernière ligne en feuille 2


--
...Patrick
Quoi que vous fassiez, faites le bien .
Mail: http://cerbermail.com/?KPW0tTCjFw
Connectez vous sur ce forum par :
news://msnews.microsoft.com/microsoft.public.fr.excel





"Angela" a écrit dans le message de
news:
Bonjour a tous,
Je voudrai copier certain elements d'un tableau (Dont le contenu n'est
jamais le meme) a la fin d'un autre.
Il parait qu'il existe un fonction qui me permettrait de dire un truc su
genre :"Tant que les lignes de mon tableau 1 sont differentes de vide
copie

telle et telle cellules a la fin du tableau 2".
Quelqu'un connaitrait il cette fonction miracle???:)))
Merci beaucoup d'avance




Avatar
CAP2
SAlut,

j'apporte juste une petite précision à la réponse de Patrick :

Le "Selection.CurrentRegion.Select" va sélectionner l'ensemble de ton
tableau de départ.
Si tu ne veux copier qu'une partie de ton tableau, fais-le nous savoir et on
réadapte...

A plus

CAP2
Avatar
...Patrick
Juste Cap2 mais manque de détail ;-)


"CAP2" a écrit dans le message de
news:
SAlut,

j'apporte juste une petite précision à la réponse de Patrick :

Le "Selection.CurrentRegion.Select" va sélectionner l'ensemble de ton
tableau de départ.
Si tu ne veux copier qu'une partie de ton tableau, fais-le nous savoir et
on

réadapte...

A plus

CAP2





Avatar
...Patrick
elle copie la zone sélectionnée dans la feuille 2 suite à la dernière ligne
occupée de cet onglet , c'était pas ça ?
sheets(2) est la 2eme feuille en partant de la gauche dans tes onglets, tu
pourrais y mettre le nom de ta feuille de destination à la place :-)
Reviens si pas ok

--
...Patrick
Quoi que vous fassiez, faites le bien .
Mail: http://cerbermail.com/?KPW0tTCjFw
Connectez vous sur ce forum par :
news://msnews.microsoft.com/microsoft.public.fr.excel


--
Je préfère glisser ma peau sous des draps pour le plaisir des sens que de la
risquer sous les drapeaux pour le prix de l'essence."

Raymond Devos


"Angela" a écrit dans le message de
news:%
Merci Patrick mais il me semble que ta fonction
rng1.Copy Destination:=Sheets(2).Range
("a65536").End(xlUp)(2) ' copie à la
dernière ligne en feuille 2
copie sur la derniere ligne de la feuille, or moi je voudrai copier a la

fin

d'un tableau se trouvant sur une autre feuille...

"...Patrick" <http://cerbermail.com/?KPW0tTCjFw> a écrit dans le message
news: #
Salut Angela,
tu peux te baser sur ceci pour copier ton tableau à la fin de ton onglet
2.


Range("A2").Activate ' dans le tableau de départ
Selection.CurrentRegion.Select
Set rng1 = Selection
rng1.Copy Destination:=Sheets(2).Range("a65536").End(xlUp)(2) ' copie à
la


dernière ligne en feuille 2


--
...Patrick
Quoi que vous fassiez, faites le bien .
Mail: http://cerbermail.com/?KPW0tTCjFw
Connectez vous sur ce forum par :
news://msnews.microsoft.com/microsoft.public.fr.excel





"Angela" a écrit dans le message de
news:
Bonjour a tous,
Je voudrai copier certain elements d'un tableau (Dont le contenu n'est
jamais le meme) a la fin d'un autre.
Il parait qu'il existe un fonction qui me permettrait de dire un truc
su



genre :"Tant que les lignes de mon tableau 1 sont differentes de vide
copie

telle et telle cellules a la fin du tableau 2".
Quelqu'un connaitrait il cette fonction miracle???:)))
Merci beaucoup d'avance












Avatar
Angela
Merci Patrick mais il me semble que ta fonction
rng1.Copy Destination:=Sheets(2).Range
("a65536").End(xlUp)(2) ' copie à la
dernière ligne en feuille 2
copie sur la derniere ligne de la feuille, or moi je voudrai copier a la fin

d'un tableau se trouvant sur une autre feuille...

"...Patrick" <http://cerbermail.com/?KPW0tTCjFw> a écrit dans le message
news: #
Salut Angela,
tu peux te baser sur ceci pour copier ton tableau à la fin de ton onglet
2.


Range("A2").Activate ' dans le tableau de départ
Selection.CurrentRegion.Select
Set rng1 = Selection
rng1.Copy Destination:=Sheets(2).Range("a65536").End(xlUp)(2) ' copie à la
dernière ligne en feuille 2


--
...Patrick
Quoi que vous fassiez, faites le bien .
Mail: http://cerbermail.com/?KPW0tTCjFw
Connectez vous sur ce forum par :
news://msnews.microsoft.com/microsoft.public.fr.excel





"Angela" a écrit dans le message de
news:
Bonjour a tous,
Je voudrai copier certain elements d'un tableau (Dont le contenu n'est
jamais le meme) a la fin d'un autre.
Il parait qu'il existe un fonction qui me permettrait de dire un truc su
genre :"Tant que les lignes de mon tableau 1 sont differentes de vide
copie

telle et telle cellules a la fin du tableau 2".
Quelqu'un connaitrait il cette fonction miracle???:)))
Merci beaucoup d'avance








Avatar
Angela
A vrai dire oui, je ne veux qu'une partie... Ou plutôt je ne veux que
certaines colonnes...
"CAP2" a écrit dans le message news:

SAlut,

j'apporte juste une petite précision à la réponse de Patrick :

Le "Selection.CurrentRegion.Select" va sélectionner l'ensemble de ton
tableau de départ.
Si tu ne veux copier qu'une partie de ton tableau, fais-le nous savoir et
on

réadapte...

A plus

CAP2