I have a problem. and don't know how to solve it.....

First the situation....
I have a table on a worksheet. Every row in that table contains data but
some rows are hidden. Even the last row of that table could be hidden.
Now I want to add a new row (at the end) of the table, but when I do this by
using the code (see below), I goes wrong when the last row in the table is
hidden.
The problem is that the hidden row will be overwritten.....

ActiveCell.Copy Destination:=Range("Base_KT").End(xlDown).Offset(1 , 0)

Thanks in advance,

Paul Bleijlevens

PS: Range("Base_KZT) is the named cell in the upper left corner of the
table.....