Я пытаюсь добавить форму, а именно текстовое поле.

Мне нужно добавить его после всего содержимого, которое я добавил через vba. Я могу'Кажется, я не понимаю, как это сделать, поскольку для добавления фигуры необходимо точное измерение параметров Left и Top.

Dim shpActual 
Dim pos, PtsToInches 
set shpActual = Selection.Shapes.AddTextbox(msoTextOrientationHorizontal, 92, PtsToInches, 437.4, 69) 
pos = Selection.Range.Informatio(wdVerticalPositionRelativeToPage) 
PtsToInches = pos / 72