Экспорт в Excel - неверный тип переменной

Ребята, подскажите, экспорт делаю в excel при попытке экспорта ошибка - неверный тип переменной (ошибка на строке, выделенной тегом жирным шрифтом).
Как быть?

procedure TfrmAdmPlan.btnExportAdmPlanClick(Sender: TObject);
var
  AExcelApp: OLEVariant;
  ARowStart, I: Integer;
begin
  ARowStart := 24;
  with TOpenDialog.Create(Self) do
    try
      InitialDir := GetCurrentDir;
      Filter := 'Support Files (Excel Files)|*.xlsx;*.xls';
      if Execute then
      begin
        AExcelApp := CreateOleObject('Excel.Application');
        if VarIsNull(AExcelApp) then Exit;
        AExcelApp.DisplayAlerts := False;
        AExcelApp.Application.EnableEvents := False;
        AExcelApp.WorkBooks.Open(FileName);
[b]        AExcelApp.ActiveWorkBook.WorkSheets[1].Cells[ARowStart, 2].Value := vw.DataController.Values[0, vwName.Index];[/b]
        AExcelApp.Visible := True;
        AExcelApp.ActiveWorkBook.SaveAs('Plan.xlsx');
      end;
    finally
      Free;
      AExcelApp.Quit;
      AExcelApp := UnAssigned;
    end;
end;

wsnet,

Sheet.Range[RefToCell(i+1, j+1), RefToCell(i+1, j+1)].value:=
где RefToCell функция преобразующая цифры в буквы. Реализацию можно найти здесь же (на форуме, поиском)

Gerasimenko, спасибо!

Вопрос, в случаи указания в шаблоне Excel форматы скажем даты, при экспорте формат останется таким же или будет преобразован в общий?

делаю так

OleVariant(VarToDateTime(vw.DataController.Values[0, vwRegDate.Index]))

Чем это решение хуже коллеги Gerasimenko ?

wsnet
делаю так OleVariant(VarToDateTime(vw.DataController.Values[0, vwRegDate.Index])) Чем это решение хуже коллеги Gerasimenko ?

Герасименко написал о способе адресации ячеек. У вас используется свойство Cells с адресацией в стиле R1C1 (два числа), Герасименко предложил вместо этого использовать Range с адресацией в стиле A1 (буква и число). А то, что вы сейчас привели, это про другое - про тип переменной.