Copier des donnees d'une feuille a l'autre en VBA mais que c

Bonjour

je suis en train de me faire une caisse enregistreuse pour mon commerce

je cherche la solution de copier chaque ticket client sur une feuille recapitulative qui me servira a faire des stats.

problème j 'arrive a copier sur cette feuille mais chaque copie écrase la précédente;

j'aimerais quelles se superposent

y à une histoire de Row + 1 mais je n'y arrive pas

Ci joint le code que j'ai obtenu en faisant enregistrerune macro

et j'ai rajouté des lignes attrapées sur des forum

merci de votre aide

un débutant de 58 ans

Sub transfert()

Sheets("CAISSE").Select

Range("A1000").Select

Selection.End(xlUp).Select

Ligne = Row + 1

Range("A2:H17").Select

Selection.Copy

Sheets("RECAPITULATIF").Select

Range("A2").Select

ActiveSheet.Paste

Sheets("CAISSE").Select

Application.CutCopyMode = False

Ligne = Row + 1

Bonjour,

En rouge les lignes à ajouter

Sheets("RECAPITULATIF").Select

Range("A2").Select

ActiveSheet.Paste

iDerLig = Sheets("RECAPITULATIF").Range("A" & Rows.Count).End(xlUp).Row

Sheets("RECAPITULATIF").Range("A" & iDerLig+1).PasteSpecial xlPasteAll

A tester

Merci de fournir un fichier en exemple !

Bouben

Merci beaucoup CA MARCHE!!!!!

je voudrais qu 'a chaque enregistrement s'affiche la date

je rajoute quoi ?

merci d 'avance

Bonsoir,

rominay a écrit :

je voudrais qu 'a chaque enregistrement s'affiche la date

je rajoute quoi ?

On ne peut bien sûr pas répondre à cette question !

Il n'y a aucune réponse standard à des questions spécifiques.

1 : fournir le fichier concerné

2 ; détailler le résultat souhaité, avec les règles et un exemple

Bouben