Freigeben über

Worksheets.FillAcrossSheets Method

Excel Developer Reference

Copies a range to the same area on all other worksheets in a collection.

Syntax

expression.FillAcrossSheets(Range, Type)

expression   A variable that represents a Worksheets object.

Parameters

Name Required/Optional Data Type Description
Range Required Range 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.

Example

This example fills the range A1:C5 on Sheet1, Sheet5, and Sheet7 with the contents of the same range on Sheet1.

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

See Also