А буквы как меняться будут? Которые указывают на столбец

Char(Ord('C')+j) что-то вроде этого

Так-то функцией пользуюсь
function ExcelCellsValue(ASheet: OLEVariant; ARow, ACol: integer): string;
var
 v: Variant;
begin
 result := '';
 try
   v := ASheet.Cells[ARow,ACol].Value;
   if VariantIsEmpty(v) then exit;
   if VarType(v)=varError then exit;
   result := Trim(v);
 except
   result := '';
 end;
end;

Не понимаю, что она делает

текст ячейки возвращает )

Просто в моем примере выдергиваются определенные столбцы при определенных введенных данных

ARow-строка, ACol-колонка

Совершенно не понимаю, как ее применить(

T_2 массив чего? Может не так поняла)

for iserch:=1 to .. do
 for j=0 to 17 do
   t_2[j] := ExcelCellsValue(Sheet_,iserch,j+2);
Ты же строки записываешь? А вместо ['C'+Float..] должно ['C',Float..]?

Не +2, а +3. Это же 'C'

Пошла работой заниматься )

Идея обращаться к ActiveSheet вместо конкретного рабочего листа таит опасность выгрузить не те данные, если книга будет сохранена с другим активным листом (оператор щёлкнул ярлык другого листа, нажал сохранить - всё, у нас проблемы). Правильнее обращаться к листу по его имени. Тогда вообще неважно, какой лист активен и где по порядку находится этот лист. Конечно, кроме случая, когда обращение именно к активному листу является осознанным решением исходя из бизнес-логики.

И само по себе обращение к книге Excel через OLE обладает такими недостатками, как необходимость иметь установленный MS Office и общая невысокая скорость работы.

+

Тут есть один "нюанс"/ограничение - получение значения ОДНОЙ ячейки...
Если надо получить значения всей таблицы (ну, какого-то диапазона ячеек) , это будет ооооооооооооочень медленно..

Есть вариант проще и красивей, и правильнее:
Получить сразу значения всего массива ячеек... (При применении того же OLE, хотя ещё быстрее было бы использовать чтение напрямую файла посредством какой-нибудь либы, для того предназначенной.
Пример через OLE могу привести позже, ща не за компом

Это уже вынужденное решение 😁 а не основанное на мнении большинства, за которым ты и приходил с вопросом :))
Но 👍

Т.е. тебе по прежнему не нравится, но ты вынужден так делать, т.к. иначе не работает :)
Это совсем не то, что и "убедили"

Но по счастью, результат в коде - тот же самый 😁 а это - главное в команде: единообразие (и стандартизация)