Selecionar tabela numa planilha Excel e colar esta tabela em uma outra posição

procedure TTaskManager.CopiarPlanilha(ALinhas:Integer);
var
  iLinhaExcel, iColunaExcel, QtdLinhas : Integer;
  objExcel, xlw, xlobjExcel, excelSheet : Variant;
begin
  objExcel := CreateOleObject('Excel.Application');
  xlobjExcel := 00000006;
  objExcel.DisplayAlerts := False;
  xlw := objExcel.WorkBooks.Open('C:\Planilha.xlsx');

  for iLinhaExcel := 5 to 20 do
    for iColunaExcel := 2 to 26 do
    begin
      objExcel.Cells[iLinhaExcel,iColunaExcel].Select;
      objExcel.Selection.Copy;
      objExcel.Cells[iLinhaExcel+ALinhas,iColunaExcel].PasteSpecial;
    end;

  xlw.SaveAs('C:\Planilha.xlsx');
  xlw.Close;
  xlw := UnAssigned;
  objExcel.Quit;
  objExcel := Unassigned;
end;