Application.ActiveSheet.Copy

阅读次数 177

希望能添加这个复制工作表的方法。

2 Answers
//定义API
let API = Application;
//定义使用区域
let UsedRange = API.ActiveSheet.UsedRange;
//复制使用区域
Application.ActiveSheet.UsedRange.Copy();

//定义工作表名字
let sheetName = year + (month < 10 ? '0' + month : month) + '统计';

//添加工作表Sheet
console.log('Create Sheet: ' + sheetName);
Application.Sheets.Add(null, Application.ActiveSheet.Name, 1, Application.Enum.XlSheetType.xlWorksheet, sheetName)

//激活工作表Sheet
console.log('Active Sheet: ' + sheetName);
Application.Sheets.Item(sheetName).Activate()

//粘贴使用区域
ActiveSheet.Paste(Range('A1'));

这是我用的方法,仅供参考!

找到新的复制方法 Application.Sheets.Copy() 但是,无法指定向前复制或向后复制,默认向后。