Tableau copier a la suite...

dakinec · 16 Avril 2013

Bonjour je vous explique mon petit problème.
Je voudrais avoir un tableau excel ( MASTER ) qui par un bouton ''macro'' pourrait renvoyer les données sur une autre page mais à la suite des dernières données entrées.
Le tableau master va changer souvent.
Si je ne suis pas assez clair s.v.p me le faire savoir je vous ai mit en lien mon fichier excel test avec un peu d'explications sur les pages

MERCI à tous !! je suis plus que reconnaissant de votre forum d'aide.

JCGL · 16 Avril 2013

Re : Tableau copier a la suite...

Bonjour à tous,

Peux-tu essayer ceci associé à un bouton :

VB:

Option Explicit

Sub Archivage()
Dim DerLS&, DerLC&
DerLS = Feuil1.Range("C65000").End(xlUp).Row
DerLC = Feuil2.Range("A65000").End(xlUp).Row + 1


Feuil1.Range("C9:E" & DerLS).Copy Feuil2.Range("A" & DerLC)
Feuil1.Range("C9:E" & DerLS).ClearContents
End Sub

Ou ceci si tu souhaites conserver les données (avec une autre écriture du code) :

VB:

Option Explicit

Sub Archivage()
Feuil1.Range("C9:E" & Feuil1.Range("C65000").End(xlUp).Row).Copy _
Feuil2.Range("A" & Feuil2.Range("A65000").End(xlUp).Row + 1)
'Feuil1.Range("C9:E" & DerLS).ClearContents
End Sub

A+ à tous

dakinec · 17 Avril 2013

Re : Tableau copier a la suite...

Ahhh ça fonctionne!!! MERCI BEAUCOUP ! vous êtes un génie

dakinec · 17 Avril 2013

Re : Tableau copier a la suite...

Voilà le tout fonctionnait sur ma feuille test, mais hélas lorsque j'ai transfèré sur mon original, ça na pas fonctionner.
Je vous envoie ma feuille originale, les explications de mon problème sont toutes sur ma feuille excel
Merci à vous tous encor

JCGL · 17 Avril 2013

Re : Tableau copier a la suite...

Bonjour à tous,

Ton dernier fichier avec le code déposé et ajout d'une MeFC.

A+ à tous

Tableau copier a la suite...

dakinec

XLDnaute Nouveau

Pièces jointes

JCGL

XLDnaute Barbatruc

dakinec

XLDnaute Nouveau

dakinec

XLDnaute Nouveau

Pièces jointes

JCGL

XLDnaute Barbatruc

Pièces jointes

Discussions similaires