Worksheets.FillAcrossSheets|Worksheets.FillAcrossSheets 方法

Worksheets.FillAcrossSheets 方法 【Worksheets.FillAcrossSheets|Worksheets.FillAcrossSheets 方法】将单元格区域复制到集合中所有其他工作表的同一位置。

x = Array("Sheet1", "Sheet5", "Sheet7") Sheets(x).FillAcrossSheets _ Worksheets("Sheet1").Range("A1:C5")

    推荐阅读