Sorting multiple tables on one worksheet

I have a series of independent tables on one worksheet, taking the same columns (column A and B). What I need to do is find the max column B value of each respective table, and report that value and its associated column A value. Each set of tables is separated by a row of dashes. Is there a way to automate this? The tables in each worksheet have the same number of rows, but there are other worksheets that have multiple tables also that I would like to reuse the automation process on. Thanks in advance.

Not sure this meets all your criteria, but it works particularly weel if all your tables are -- at least initially -- the same number of rows.

The macro works, but is there a way to introduce the reference to the number of rows as a variable? For example, something along the lines of ..

X=24
=INDEX(A1:B103,MATCH(MAX(B1:B[1+X]),B1:B[1+X],0),1)

If you're concerned about adding rows, just extend the reference from B1:B7 to B1:B8. That way, if you add rows above the formula (currrently in B9), the range expands.

Another option is to use dynamic range names, but the formula needs to be moved (say, to Column C). To do this, define a new range name (say, "Table1") and, in the "refers to" box, type:

=offset($B$1,0,0,COUNTA($b:$b))

Then change the two references in your formula from B1:B7 to Table1.