Macro for copy and paste from one sheet to another on different rows

[Fergjosh97]

Hello! I'm still a beginner on so let me know if i'm not clear enough.
I need to copy from Sheet 1 and paste on Sheet 2 in a automatic way, so when I click on a button on Sheet 1 it pastes on Sheet 2.
The data comes from 4 Drop-down lists with multiple cells on sheet 1. I learned how to do it, but know i need that every new entry i select on the drop down lists goes to different rows on sheet 2, so when i'm finished copying and pasting the data from the drop-down menus, i'll have a list on sheet 2 with all the data, in different rows, and not to be replaced on the first row everytime i run the macro. how can i proceed?
thanks in advance

 

[HaHoBe]

Hi Fergjosh97,

if you have recorded a macro or written some code on your own what about posting it? Or maybe pass information on what cells to copy to which columns on the other sheet.

Assuming you have headers on row 1 on the target sheet maybe this code can point into the direction to take:

Dim lngWrite As Long      'will deliver next row to be filled

With Sheets("Target")
  lngWrite = .Range("A" & .Rows.Count).End(xlUp).Row + 1
  .Cells(lngWrite, "A").Value = Sheets("Data").Range("A1").Value
End With

Ciao,
Holger