Hello,

After filling all fields in excel I do a AutoFit().
Is the a way to assign a minimum height to a row.

After the Autofit() I want to read the height of the row, and if it is to small a want to give it a fixed height.

Thanks,
Marc

include "fivewin.ch"

FUNCTION MAIN

LOCAL oExcel
LOCAL oAs

oExcel := CreateObject( "Excel.Application" )

oExcel:WorkBooks:Add()

oAS := oExcel:ActiveSheet()

oAs:Range( "A1" ):Value := 10

oAS:Columns( "A" ):AutoFit()

oExcel:Visible := .T.
inkey(3)

oAs:Range( "A1" ):RowHeight := 30

RETURN NIL

Thanks Marco,

It's working fine.

Marc