Making range dynamic to Create Table

[K243]

Hello

I am trying to create a table which will have all the data in a specific sheet included in it.

This is what I have so far and does work (mostly):

Sub CreateTable()

    ActiveSheet.ListObjects.Add(xlSrcRange, Range("$A$1:$G$325"), , xlYes).Name = _
        "Table3"
    Range("Table3[#All]").Select
End Sub

However the range will keep changing as more data is added. Please can someone confirm the code to make the range include everything in the sheet. There will never be more columns only more rows.

I tried making the range a larger number but that then includes the empty cells so is not an option.

Thank you for the help.