Прикрепя таблица BIFF8 (Excel ListObject) към диапазон от клетки и връща новия обект
TXLSTable за задаване на допълнителни свойства
Синтаксис
function AddTable(
const AName, ARange: WideString;
AColumns: TStrings):
TXLSTable;
| AName |
WideString. Името на таблицата със структурирани препратки, показвано в Name Box на Excel, например 'SalesTable'. Става едновременно Name и DisplayName на върнатия обект |
| ARange |
WideString. Диапазонът от клетки, който Table обхваща в A1 нотация, например 'A1:D10'. Първият ред на диапазона се третира като ред на заглавията |
| AColumns |
TStrings. Заглавен текст за всяка колона. Трябва да съдържа точно толкова елементи, колкото е ширината на диапазона |
Забележки
Новата таблица се добавя към колекцията
Tables на работния лист. По подразбиране
StyleName е
'TableStyleMedium2'
BIFF8 записва групата записи FEATHEADR11 / FEAT11 / LIST12 само при SaveAs(xlExcel97). Записите BIFF5 не са засегнати (таблиците са концепция на BIFF8+)
Пример
Записва четириколонна таблица за регион на продажби в A1:D10
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;
Вижте също