XL 2016 Copier le contenu d'un tableau, a la fin d'un autre tableau...

[jeanyves31]

Bonjour

J'ai un page "Saisie" ou j'ai créer un tableau nommé "FAC_Fournisseur". J'ai également nommé les données de ce tableau "Corps_Facture" (sans les entêtes...)
Je souhaite copier le contenu de ce tableau, dans un autre tableau qui contient toute les ligne de factures
J'ai donc un tableau dans la feuille "Facture" nommé BD_Facture

Étant débutant en VBA, j'ai fait un enregistrer macro qui me donne le code suivant

Sub ENR_Facture()
'
' ENR_Facture Macro
'

'
Application.Goto Reference:="Corps_facture"
Selection.Copy
Sheets("Factures").Select
ActiveWindow.SmallScroll Down:=51
Range("A280").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveWindow.SmallScroll ToRight:=1
End Sub

Le problème est que ca me copie toujours au meme endroit en A280...
comment faire pour faire la copie à la fin du fichier?
Merci pour votre aide
Jean Yves

 

[Jacky67]

Bonjour,
Sans classeur avec la structure....
Avec les informations données je dirais

Sub ENR_Facture()
[Corps_facture].Copy Sheets("Facture").Range("a" & Cells(Sheets("Facture").Rows.Count, 1).End(xlUp).Row + 1)
End Sub

 

[jeanyves31]

Bonjour Jacky
Et merci pour ton aide...
Je joints mon petit fichier...
Avec ta macro, voici ce que j'ai:
1) si j’exécute la macro, depuis la feuille "Saisie_Facture" la copie ce fait bien sur la feuille facture mais a chaque fois en début de tableau...
2) si j'exécute la macro depuis la feuille "Factures" la copie de fait bien à la suite....
3) j'ai un problème avec le n° de facture, puisqu'il ne se copie pas...a priori c'est pas un problème de format...

Merci...

 

[Jacky67]

Bonjour Jacky
Et merci pour ton aide...
Je joints mon petit fichier...
Avec ta macro, voici ce que j'ai:
1) si j’exécute la macro, depuis la feuille "Saisie_Facture" la copie ce fait bien sur la feuille facture mais a chaque fois en début de tableau...
2) si j'exécute la macro depuis la feuille "Factures" la copie de fait bien à la suite....
3) j'ai un problème avec le n° de facture, puisqu'il ne se copie pas...a priori c'est pas un problème de format...

Merci...

Re..
Tester le classeur en PJ

 

[jeanyves31]

Merci à toi Jacky ca fonctionne parfaitement....

Petite question subsidiaire ....un fois les données copier comment peut on les effacer du tableau "FAC_Facture3

 

[Jacky67]

Re..
Le classeur en Pj fera ce que tu demandes.
Mais comme il y a des formules dans ce tableau elles seront perdues
La fonctionnalité de ce classeur reste très sommaire.
Tu devrais faire des recherches sur le forum et te familiariser avec les userformes