Adjunta una tabla BIFF8 (ListObject de Excel) a un rango de celdas, devolviendo el nuevo objeto TXLSTable para que se puedan ajustar propiedades adicionales (StyleName, indicadores de filas en banda, TotalsRowShown) antes de guardar. (Disponible desde v2.33.0.)
Sintaxis
function AddTable(
const AName, ARange: WideString;
AColumns: TStrings):
TXLSTable;
| AName |
WideString. El nombre de tabla con referencia estructurada que aparece en el cuadro de nombres de Excel, por ejemplo 'SalesTable'. Se convierte en Name y DisplayName del objeto devuelto |
| ARange |
WideString. El rango de celdas que cubre la Table en notación A1, por ejemplo 'A1:D10'. La primera fila del rango se trata como fila de encabezado |
| AColumns |
TStrings. Texto de encabezado por columna. Debe contener exactamente tantas entradas como ancho tenga el rango |
Observaciones
BIFF8 emite el grupo de registros FEATHEADR11, FEAT11 y LIST12 solo en SaveAs(xlExcel97). A partir de v2.33.2, los registros AUTOFILTERINFO y AUTOFILTER de nivel de hoja se suprimen cuando una tabla cubre completamente el rango de autofiltro
Este ejemplo escribe una región de ventas de cuatro columnas vinculada como tabla en A1:D10
Ejemplo
var
cols: TStringList;
begin
cols := TStringList.Create;
try
cols.Add('Region');
cols.Add('Product');
cols.Add('Quarter');
cols.Add('Revenue');
Sheet.AddTable('SalesTable', 'A1:D10', cols);
finally
cols.Free;
end;
Véase también