役立つ便利なサイト
役に立つフリーソフト
コラム集:Excel VBA Tips |
←前コラム 目次 次コラム→ |
|
同時に複数のワークシートに値をコピーする |
分類:VB/VBA 著者:徳永秀雄 更新日付:2008/12/14 |
[概要] FillAcrossSheetsメソッドで、指定したセル範囲を、複数のワークシートの同じ位置にコピーすることができます。 [書式] Object.FillAcrossSheets(Range, Type) ▲引数の説明 Range :フィルの対象のセル範囲 を指定 Type :セル範囲のコピー方法。以下のような定数で指定。 xlFillWithAll :すべて xlFillWithContents :値(内容) xlFillWithFormulas :式 属性 メソッド 所属オブジェクト Worksheetsコレクション 操作対象オブジェクト Worksheetsコレクション [例] 'Sheet1のセル範囲「B1:C7」をSheet2、Sheet3にコピー Dim SheetArray As Variant SheetArray = Array("Sheet1", "Sheet2", "Sheet3") Worksheets(SheetArray).FillAcrossSheets Range:=Worksheets("Sheet1").Range("B1:C7") |
|
←前コラム 目次 次コラム→ |