N eed to add number of used rows to my range

[bjfelker]

I have see a few ways to count the rows and have tried to put it in my vba every way I can think of and I cant get it to work. I am still new to all this vba stuff so thanks in advance for your patience. Here is my current range

ActiveSheet.ListObjects.Add(xlSrcRange, Range("$F$1:$I$170"), , xlYes).Name = _
        "Table4"

The I170 will be the one that changes and I would like to auto size the table to fit the data. Thanks again!

 

[VoG]

Try

Dim LR As Long
LR = Range("F" & Rows.Count).End(xlUp).Row
ActiveSheet.ListObjects.Add(xlSrcRange, Range("$F$1:$I" & LR), , xlYes).Name = "Table4"

 

[bjfelker]

Awesome works perfect! Thanks