title: Location of first cell in an excel table
body: <p>I use Excel tables a lot. It makes it possible to have multiple tables in one worksheet. But I have got into a problem in VBA which I do not know how to solve.</p>
  
  <p>Let us say that I have a table called "tbl" in my spreadsheet. It contains the following data:</p>
  
  <pre><code>id value
  1  1000
  1  2000
  2  3000
  2  4000
  </code></pre>
  
  <p>I have the following code which works:</p>
  
  <pre><code>Sub test()
      Dim rng As Range
      Dim arr() As Variant
      Set rng = ActiveSheet.ListObjects("tbl").DataBodyRange
      arr = rng.Value
  End Sub
  </code></pre>
  
  <p>This code will put the whole table into <code>arr</code>. But there are situations where I only want some rows in the table. Let us say that I want row 4 and 5 i.e:</p>
  
  <pre><code>2  3000
  2  4000
  </code></pre>
  
  <p>The following code will do the trick:</p>
  
  <pre><code>arr = Range("A4:B5")
  </code></pre>
  
  <p>But there are cases where I have many tables located in different places in my spreadsheet. Therefore I need to work out where the first cell in the table is located (upper left). If it is located in K1, I need to get both the column and the row (K and 1).</p>
  
  <p>Is there an easy way to do this?</p>