Distance between text and margin

[MacroShadow]

Is it possible using vba to detect the distance between the text in a document (single or multiple column) (including footnotes) and the bottom margin of that page?