Club Builder

[invitados]

Como hago para cambiar el tamaño del papel en excel desde mi aplicacion en builder.
por ejemplo ponerlo tamaño carta o tamaño oficio o A4

[_Leo]

// Añadimos: #include<ComObj.hpp>

// Como ejemplo vamos a usar una instancia de excel que
// ya este abierta y con una hoja cargada y activa
Variant vExcel = GetActiveOleObject("Excel.Application");
Variant vHojaActiva = vExcel.OlePropertyGet("ActiveSheet");

// Estos son algunos tamaños de papel
// (para mas información mirar la propia ayuda de programación de excel)
enum { xlPaperLetter=1, xlPaperLetterSmall, xlPaperTabloid,
             xlPaperLedger, xlPaperLegal, xlPaperStatement,
             xlPaperExecutive, xlPaperA3, xlPaperA4, xlPaperA4Small,
             xlPaperA5, xlPaperB4, xlPaperB5 };

// Cambiamos a tamaño carta
vHojaActiva.OlePropertyGet("PageSetUp")
                    .OlePropertySet("PaperSize", xlPaperLetter);

vExcel = vHojaActiva = Unassigned;