Copy one Excel worksheet to another

Problem/Question/Abstract:

Copy one Excel worksheet to another

Answer:

Call the copy method of that worksheet:

{ ... }
var
  After: OleVariant;
  Sh: _Worksheet;
begin
  Sh := Excel.Worksheets['Sheet1'] as _Worksheet;
  After := Excel.Workbooks[1].Sheets[3];
  Sh.Copy(EmptyParam, After, lcid);
  { ... }