[pollo_c]

Estimado duilioisola:

Muchas gracias por tu tiempo, la información me ayudo mucho, ya acomodo las filas al tamaño de mi necesidad.

Saludos Cordiales

Código Delphi [-]
 Hoja.OlePropertyGet("Columns").OlePropertyGet("Item",(Variant)1).OlePropertySet("ColumnWidth",(Varia  nt)10);
                Hoja.OlePropertyGet("Columns").OlePropertyGet("Item",(Variant)2).OlePropertySet("ColumnWidth",(Varia  nt)20);
                Hoja.OlePropertyGet("Columns").OlePropertyGet("Item",(Variant)3).OlePropertySet("ColumnWidth",(Varia  nt)25);
                Hoja.OlePropertyGet("Columns").OlePropertyGet("Item",(Variant)4).OlePropertySet("ColumnWidth",(Varia  nt)40);
                Hoja.OlePropertyGet("Columns").OlePropertyGet("Item",(Variant)5).OlePropertySet("ColumnWidth",(Varia  nt)20);
                Hoja.OlePropertyGet("Columns").OlePropertyGet("Item",(Variant)6).OlePropertySet("ColumnWidth",(Varia  nt)15);
                Hoja.OlePropertyGet("Columns").OlePropertyGet("Item",(Variant)7).OlePropertySet("ColumnWidth",(Varia  nt)35);
    
                Hoja.OlePropertyGet("Rows").OlePropertyGet("Item",(Variant)fil).OlePropertySet("RowHeight",(Variant)  45);