Как выделить один или несколько листов в книге?

Delphi:

// выделить один лист

(XL.Sheets[1] as _Worksheet).Select(True, lcid);

// выделим сразу несколько листов в цикле

for i := 1 to 4 do begin

(XL.Sheets[i] as _Worksheet).Select(False, lcid); Application.ProcessMessages; end;

// листы можно выделить не в цикле, указав список выделяемых

// листов (индексы или имена) как массив

(XL.ActiveWorkbook.Sheets[VarArrayOf([1, 2, 3, 4])] as Sheets).Select(False, lcid);

// Select - выделить, Activate - активировать без снятия выделения,

// если активировать лист в выделенном диапозоне

(XL.Sheets[4] as _Worksheet).Activate(lcid);

// Если попробовать активировать 5 лист (не в выделенном диапозоне),

// то выделенным окажется только один лист

(XL.Sheets[5] as _Worksheet).Activate(lcid);

Select Method

Activate Method

How to: Select a Worksheet

Содержание раздела

---