FillAcrossSheets Method [Excel 2003 VBA Language Reference]

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.

XlFillWith

XlFillWith can be one of these XlFillWith constants.
xlFillWithAlldefault
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")

Applies to | Sheets Collection Object | Worksheets Collection