🚀 go-pugleaf

Guy--

Try:



'Get the dimensions of the page (given a document "myDocument") 
myPageWidth = myDocument.DocumentPreferences.PageWidth 
myPageHeight = myDocument.DocumentPreferences.PageHeight 
'Get the Margins of the page 
MarginB=myPage.MarginPreferences.MarginBottom  
MarginL=myPage.MarginPreferences.MarginLeft  
MarginR=myPage.MarginPreferences.MarginRight  
'Get the bounds of my TextFrame  
myBounds = DocCDN.GeometricBounds 
myFrameHeight = myBounds(2)-myBounds(0) 
myBounds(0) = MarginB - myFrameHeight 
myBounds(1) = MarginL  
myBounds(2) = MarginB 
myBounds(3) = myPageWidth - MarginR 
DocCDN.GeometricBounds = myBounds

Does that do what you want? I'm assuming that the height of the frame is what you want it to be before you start this process.
Also, if you ever need to convert from a Variant to a specific type, use a conversion--CDbl(Variant), for example, will convert the Variant to a Double.

Thanks,

Ole