FillAcrossSheets Method

Microsoft Excel Visual Basic

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")