insert revision table at a specific point

[Miguel.CarvajalS34Q6]

I apologize for being so repetitive, I need to automatically insert the revision table in each drawing sheet, but when doing so the table adopts a position that is not adequate (see image). the board is inserted too far away and interferes with the sign frame. How can I insert it by defining a point .

[A.Acheson · Accepted solution]

Hi @Miguel.CarvajalS34Q6 

Can you attach the code your using? It looks like you need just to offset in both x and y direction from the border corner position. 

[Miguel.CarvajalS34Q6]

this is the code i am using

Dim doc As DrawingDocument = ThisDoc.Document
Dim sheet As Sheet = doc.ActiveSheet

Dim position = sheet.Border.RangeBox.MaxPoint

Dim table = Sheet.RevisionTables.Add2(position, True)

Dim tableWith = table.RangeBox.MaxPoint.x - table.RangeBox.MinPoint.x
position.X = position.X - tableWith

table.Position = position

[A.Acheson]

Dim doc As DrawingDocument = ThisDoc.Document

Dim sheet As Sheet = doc.ActiveSheet

Dim position As Point2d = sheet.Border.RangeBox.MaxPoint

Dim table As RevisionTable = sheet.RevisionTables.Add2(position, True)

Dim tableWidth As Double = table.RangeBox.MaxPoint.X - table.RangeBox.MinPoint.X

Dim gap As Double = 0.9

' Get a new position in X direction 
position.X = position.X - tableWidth - gap
' Get a new position in Y direction 
position.Y = position.Y - gap

' Set the table to this new position.
table.Position = position