Transfert données ligne sur autre feuille

[sososo82]

Salut tout le monde!

j'espère que vous allez bien.

J'ai un petit souci mais je pense que c'est assez simple, en fait j'aimerais bien pouvoir transférer une ligne de données entière vers une ligne (vide si possible) d'une autre feuille de mon classeur et le tout grâceà un bouton.

Pouvez vous m'aider SVP?

Merci d'avance!

 

[suistrop]

Re : Transfert données ligne sur autre feuille

Hello,

oui on peut t aider, mais il faut en savoir plus quel ligne ? a mettre ou....
le plus simple est que tu nous donne 1 fichier dépourvu d info confidentielle.

 

[sososo82]

Re : Transfert données ligne sur autre feuille

Oui pardon, voila mon fichier simplifié

En fait il s'agit de plusieurs lignes, mais il faudrait pouvoir les sélectionner une par une à chaque fois, j'ai un code déja me permettant de supprimer une ou plusieurs lignes à volonté je pense que ça doit y ressembler mais c'est plus le passage d'une ligne d'une feuille à une autre ligne d'une autre feuille qui m'intéresse cette fois.


Merci du coup de main!

 

[suistrop]

Re : Transfert données ligne sur autre feuille

re,

Sub cartman()

Sheets("Traités").Select
der = Range("A65536").End(xlUp).Row
    Sheets("Non traités").Select
    Rows(3).Select
    Selection.Copy
    Sheets("Traités").Select
    Rows(der).Select
    ActiveSheet.Paste
    Sheets("Non traités").Select
    Rows(3).Select
    Application.CutCopyMode = False
    Selection.Delete Shift:=xlUp

End Sub

pas trop compris le but car la ca copie que 1 ligne par 1 ligne donc pas plus long de la faire a la main imo.

 

[sososo82]

Re : Transfert données ligne sur autre feuille

C'est quoi "der" ?