[Thrasher]

Может надо просто так написать:

Код:

 MainDM.HaveDuplicate.Parameters.ParamByName('Name').AsString := ExcelApplication.Range[Cell1,Cell1].Value2;