Macro - Adding Copied Data to BOTTOM of a Table

[mknipfer]

Hey Friends,

I have a table on 'Sheet1' in my workbook. On 'Sheet 2' I have some formulas happening to determine what needs to be added to the table on 'Sheet 1'. When it's determined what needs to be added to the table, I need that data to be appended to the BOTTOM of the table on 'Sheet1' after a button is clicked to confirm. What needs to be added to the table will show up in 'Sheet2' in cells A9:B9.

The simplified version of the ask:

• User clicks button
• Info in Cells A9:B9 on Sheet2 is copied
• Copied info is pasted at the END of the table on Sheet1 Located in Columns P:Q

I've seen a few different posts about things like this - but I can't make anything work properly. Any thoughts? I appreciate it, all!

 

[Norie]

You don't say which fields in the table the data is to be copied to.

This code adds a row to the first table on Sheet1 and copies the data from A9:B9 on Sheet2 to the first 2 columns in the new row.

Dim tbl As ListObject
Dim rw As Range

    Set tbl = Sheets("Sheet1").ListObjects(1)
    
    
    Set rw = tbl.ListRows.Add.Range
    
    Sheets("Sheet2").Range("A9:B9").Copy rw

 

[mknipfer]

My Hero! Thanks Norie, this works amazingly.