Display Average of Named Table Column in a Message Box

[BrianExcel]

I have a named table "PercentEditTable" which has a header row and then a data set for each of two columns. I also have a second table, "PercentEditTable_New", which encompasses just the data set with no header row.

The second row, with header "Percent Edit", I need to do an average of all rows of data in that column and display the average as a % in a messagebox.

How would I do this?

 

[BrianExcel]

I am thinking something along the lines of

BallEditsNew = WorksheetFunction.Average(Range("PercentEditTable_New[Percent Edit]"))

But when I do this it shows me either a "0" or a blank value. Each of the numbers in the dataset are formatted as "General".

 

[Fluff]

If you format that column as short date, what happens?

 

[BrianExcel]

It looks like for reason Excel just doesn't like that code. If I use this it works:

    BallEdits = Application.Average(ActiveSheet.ListObjects(1).ListColumns("Percent Edit").Range)