Inserting graphic in last table

[lodi123]

Hi guys,

I'm wondering if there is a possibility to refer to the last table in a Word document.
I need to insert a graphic in the last table, but it is possible that the number of tables inside the document will change. So I can't use the Tables(X) in the code.

Now I got this:
Sub ShowInterim(control As IRibbonControl)

With ActiveDocument
Dim oBB As BuildingBlock
Dim oRng As Range
Dim oField As Field
Dim oSection As Section
Dim oHeader As HeaderFooter
Dim oFooter As HeaderFooter



Set oRng = ActiveDocument.Tables(18).Rows(1).Cells(1).Range
oRng.End = oRng.End - 1 'to exclude the end of cell marker
Set oBB = ActiveDocument.AttachedTemplate.BuildingBlockEntri es("Interim")
oBB.Insert Where:=oRng, RichText:=True
For Each oSection In ActiveDocument.Sections

For Each oHeader In oSection.Headers
If oHeader.Exists Then
For Each oField In oHeader.Range.Fields
oField.Update
Next oField
End If
Next oHeader
Next oSection

End With

End Sub

Is there a possibility like Table(Last) or something to fix this? The last table will also be on the last page of the document, if this helps.

[gmaxey]

Have you tried:
ActiveDocument.Tables(ActiveDocument.Tables.Count) .Rows(1).Cells(1).Range

[lodi123]

Oh wow this is great!! Thank you so much!!