Excel问题：复制当前的WorkSheet到指定的WorkSheet之后

Question

拷贝整个工作表：
    ExcelApplication1.ActiveSheet.Used.Range.Copy;
从A1位置开始粘贴：
    ExcelApplication1.ActiveSheet.Range.[ 'A1' ].PasteSpecial;

Answer 1

我说的是整个Sheet拷贝并放到指定的Sheet之后,不是拷贝内容

Answer 2

ExcelApplication1.Worksheets("Sheet1").Copy(Worksheets("Sheet1"));
将VB中的代码翻译过来即可。

Answer 3

To yjs_lh(长风浪子):
  你的代码是复制到指定sheet之前，我要的复制到指定sheet之后的，就是那个after参数应该怎样翻译过来？

Answer 4

Copy 方法
                语法 1： 将指定对象复制到剪贴板。将数据点或数据系列的图片复制到剪贴板上。语法 2： 将选定的 Range 对象复制到指定区域或者复制到剪贴板上。语法 3： 将工作表复制到工作簿的另一位置。语法 1expression.Copy语法 2expression.Copy(Destination)语法 3expression.Copy(Before, After)expression   必选。该表达式返回“应用于”列表中某个对象。要复制整张图表，可对 Chart 对象使用语法 3。如果仅复制图表区域，可对 ChartArea 对象使用语法 1。Destination   Variant 类型，可选。指定区域要复制到的新区域。如果省略该参数，则 Microsoft Excel 将指定区域复制到剪贴板。Before   语法 3： Variant 类型，可选。复制工作表放到此工作表之前。如果已经指定了 After，则不能指定 Before。After    Variant 类型，可选。复制工作表放到此工作表之后。如果已经指定了 Before，则不能指定 After。说明如果既不指定 Before 参数也不指定 After 参数，则 Microsoft Excel 将新建一个工作簿并将复制工作表放到新工作簿中。