Add Project to 'database'

Hi,

I recorded my marco.

Sub Add_to_Project_List()
'
' Add_to_Project_List Macro
'
    Dim R1 As Range
    
'
    Range("C3").Select
    Selection.Copy
    Sheets("Project List").Select
'   Range("A2").Select
'    Range(Cells(2, 1).End(xlUp).Offset(1, 0)).Select
    ActiveSheet.Paste
    
    Sheets("Add Project").Select
    Range("C4").Select
'    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Project List").Select
    Range("B2").Select
    ActiveSheet.Paste
    
    Sheets("Add Project").Select
    Range("C5").Select
'    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Project List").Select
    Range("C2").Select
    ActiveSheet.Paste
    Sheets("Add Project").Select
    Range("C6").Select
 '   Application.CutCopyMode = False
    Selection.Copy
    Sheets("Project List").Select
    Range("D2").Select
    ActiveSheet.Paste
    Sheets("Add Project").Select
    Range("C14").Select
'    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Project List").Select
    Range("E2").Select
    ActiveSheet.Paste
    Sheets("Add Project").Select
    Range("C8").Select
'    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Project List").Select
    Range("F2").Select
    ActiveSheet.Paste
    Sheets("Add Project").Select
    Range("C9").Select
'    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Project List").Select
    Range("G2").Select
    ActiveSheet.Paste
    Sheets("Add Project").Select
    Range("C10").Select
'    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Project List").Select
    Range("H2").Select
    ActiveSheet.Paste
    Sheets("Add Project").Select
    Range("C11").Select
'    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Project List").Select
    Range("I2").Select
    ActiveSheet.Paste
    Sheets("Add Project").Select
    Range("C12").Select
'    Application.CutCopyMode = False
    Selection.Copy
    Sheets("Project List").Select
    Range("J2").Select
    ActiveSheet.Paste
End Sub

Basically my intention is to create a database filled with my projects.

1) is there a way to simplify the coding?
2) how to I add to a new line? This code always overwrite the first line.

PS: It is recorded as a marco and i have not linked it to the button.