For i = 1 To ActiveDocument.Frames.Count
' need to add code here to reduce frame height down to 10, for example
'but keeping the center from top of the page unchanged.
' Also what is the code to read frame height?
'MsgBox Selection.Borders.Height '<-- doesn't work
Question1: How to reduce frame height to a specified value keeping left to right center line of the frame on the same place.
Question2: What is the syntax to read the height of a frame?