Excel - Tables - Identifying the next line

1

Good afternoon. This is my first question here. Right now, I thank anyone who can guide me.

I made a spreadsheet with some tables (tab "Home", "Format as table"). Then I made a VBA to clear this table and insert new information from a text file. I was using a feature that is identifying the row where the table is through the Range command ("Table Name"). From there, I incremented an accountant who was always giving me the number of the next line. See below:

    ...
    Application.Goto Reference:="NomeDaTabela"
    PróximaLinhaDaTabela = Range("NomeDaTabela").Row
    For X = 1 To 50 'Simulando os registros de um array
        ActiveSheet.Cells(PróximaLinhaDaTabela, 1) = X
        PróximaLinhaDaTabela = PróximaLinhaDaTabela + 1
    Next
    ...

It turns out that I, in fact, am not "controlling" the next row in the "TableName" table. I'm tracking the next row of the worksheet ("ActiveSheet"). When I try to add a new row in the table via the Range command ("Table name") .Insert, it inserts a row at the beginning of the table just below the header. I would like it to insert at the end after the other rows of the table If I try to use the Range (CellName) command, it uses the position of the table plus the number of rows entered. That is, the Range command ("TableName") "knows" where the table is located. I just do not know how to reference it.

Has anyone done anything like this?

Thanks in advance.

    
asked by anonymous 28.04.2017 / 21:59

1 answer

0

Welcome!

If you are looking to add a line to an object as a pre-defined table, the code looks something like this:

Set myNewRow = ActiveWorkbook.Worksheets(1).ListObject(1).ListRows.Add

In this case you should add a line below.

I hope I have helped!

Reference

    
29.04.2017 / 02:04