VBA Macro - Locate last blank row & paste selection

[LNG2013]

Hi I am writing a code that selects data all the data from one workbook (except header) and pastes it to a master file. I got the slect part right, but I am having difficulty figuring out how to write it to locate the last row where there is no data and pasting the selection there.

Sub AppendMaster()
 
Workbooks.Add
    Workbooks.Open Filename:=ThisWorkbook.Path & "\Minor.csv"
    Dim rng As Range
    Set rng = ActiveSheet.UsedRange
        Set rng = rng.Offset(1).Resize(rng.Rows.Count - 1)
        rng.Select
    Selection.Copy
    Workbooks.Open Filename:=ThisWorkbook.Path & "\Master.csv"
     Windows("Master.csv").Activate
' ???????????????????????             ActiveSheet.Paste
'
End Sub

 

[Sthrncali]

Dim NextR as Long
NextR = Activesheet.Range("A65536").End(xlUp).Offset(1,0).Row
ActiveSheet.Cells(NextR, 1).Paste