Excel VBA教程:FillAcrossSheets方法

将单元格区域复制到工作表组中所有其他工作表的同一位置。

expression.FillAcrossSheets(Range, Type)

expression   必需。该表达式返回“应用于”列表中的对象之一。

Range  Range 类型,必需。要复制到工作表组中所有其他工作表的单元格区域。该区域必须位于工作表组中某个工作表之上。

Type  XlFillWith 类型,可选。指定如何复制区域。

XlFillWith 可为以下 XlFillWith 常量之一。
xlFillWithAll default
xlFillWithContents
xlFillWithFormats

示例

本示例用工作表 Sheet1 上 A1:A5 区域的内容填充工作表 Sheet5 和 Sheet7 上的相同单元格区域。


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

上页:Excel VBA教程:Extend方法 下页:Excel VBA教程:FillDown方法

Excel VBA教程:FillAcrossSheets方法

Excel VBA教程:FillDown方法 Excel VBA教程:FillLeft方法
Excel VBA教程:FillRight方法 Excel VBA教程:FillUp方法
Excel VBA教程:Find方法 Excel VBA教程:FindFile方法
Excel VBA教程:FindNext方法 Excel VBA教程:FindPrevious方法
Excel VBA教程:Flip方法 Excel VBA教程:Follow方法
Excel VBA教程:FollowHyperlink方法 Excel VBA教程:Format方法
Excel VBA教程:获取有关 Macintosh 关键字的帮助 Excel VBA教程:FunctionWizard方法
Excel VBA教程:GetChartElement方法 Excel VBA教程:GetCustomListContents方法
Excel VBA教程:GetCustomListNum方法 Excel VBA教程:GetData方法
Excel VBA教程:GetOpenFilename方法 Excel VBA教程:GetPhonetic方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号