FillAcrossSheets Method
Copies a range to the same area on all other worksheets in a collection.
expression.FillAcrossSheets(Range, Type)
expression Required. An expression that returns one of the objects in the Applies To list.
Range Required Range object. The range to fill on all the worksheets in the collection. The range must be from a worksheet within the collection.
Type Optional XlFillWith. Specifies how to copy the range.
| XlFillWith can be one of these XlFillWith constants. |
| xlFillWithAll default |
| xlFillWithContents |
| xlFillWithFormats |
Example
This example fills the range A1:C5 on Sheet1, Sheet5, and Sheet7 with the contents of the same range on Sheet1.
x = Array("Sheet1", "Sheet5", "Sheet7")
Sheets(x).FillAcrossSheets _
Worksheets("Sheet1").Range("A1:C5")