VBA form adding data to top of table not last row

**DJ1966** · 04-30-2023, 11:52 PM

Hi hope someone can help im trying to make a form following a youtuber New to vba but have hit a tree when i add new data to a spreadsheet (Table) the form adds the data to the top in the headers row not the last row.

Please Login or Register  to view this content.

Screenshot 2023-05-01 134925.png
if needed i can add full codes or even the excel sheet
thanks

**TMS** · 05-01-2023, 01:10 AM

This

Please Login or Register  to view this content.

should be this

Please Login or Register  to view this content.

etc.

**DJ1966** · 05-01-2023, 01:16 AM

Thankyou so much this works i have a lot to learn when it comes to vba but i know now if i get a problem this is a great place for help.

**DJ1966** · 05-01-2023, 02:30 AM

ok it worked once and now im stuck again im going attact the workbook in the hope someone with more knowledge can fix this for me?
DataEntry Worms help3.xlsm

**bsalv** · 05-01-2023, 03:28 AM

i suppose shdata is the right sheet and you have a listobject in A1 of that sheet, and that's the right listobject.
Problem is, that it copies all the formats of the header, so there are a few lines to undo that.

Please Login or Register  to view this content.

another option was to copy and paste the formats of the 2nd row (if it has a 2nd row) to the 1st with something like

Please Login or Register  to view this content.

**torachan** · 05-01-2023, 09:14 AM

@DJ1966, am I right in that you just want to add the next row to the end of the table, thus increasing the table size by one row.
If so forget about finding range sizes etc., the syntax and methodology when dealing with 'structured tables' is somewhat different to referencing sheet ranges.
I have incorporated your data into the approach I use (with the table referencing syntax) - hopefully some hints and tips are helpful.
The general purpose of the 'structured table' is its ability to self-maintain (when referenced correctly it is dynamic as long as you do not manually incorporate extra blank rows).