Код:
MsExcel.ActiveWorkbook.ActiveSheet.Range[MsExcel.ActiveWorkbook.ActiveSheet.Cells[1,1]]:=floattostr(strtoint(MsExcel.ActiveWorkbook.ActiveSheet.Range[MsExcel.ActiveWorkbook.ActiveSheet.Cells[1,1]])+1);

В чем ошибка? Должно увиличивать значение в клеточке 1,1 на 1

Решение:
судя по сообщению об ошибке, эта строчка у Вас находится где-то внутри цикла for i:= .... to ....
так вот, переменную цикла нужно описать в этой же функции/процедуре, где и сам цикл.

например,

Код:
procedure TForm1.FormCreate(Sender: TObject);
// А ВОТ ТУТ НУЖНО ОПИСАТЬ ПЕРЕМЕННУЮ ЦИКЛА
var   
   i : integer;
begin

   ...
   тут ваш цикл
   for i:= .... to ... do 


end;