Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


57024 / 76732 ←次へ | 前へ→

【24449】Re:ファイル同士の集計方法
質問  ポポ  - 05/4/22(金) 13:57 -

引用なし
パスワード
   ▼G-Luck さん:

ご指摘ありがとうございます。
そうですね、集計といっても色々ありますよね。

Set myWb32 = Workbooks(2).Worksheets(3)
Set myWb33 = Workbooks(3).Worksheets(3)
Set myWb34 = Workbooks(4).Worksheets(3)
Set myWb35 = Workbooks(5).Worksheets(3)
Set myWb36 = Workbooks(6).Worksheets(3)
Set myWb37 = Workbooks(7).Worksheets(3)

'各項目データ集計
Workbooks(1).Worksheets(3).Activate

Range("I7").Select
ActiveCell.Formula = myWb32.RC+ myWb33.RC + myWb34.RC + myWb35.RC + myWb36.RC+ myWb37.RC

With Range("I7").Select
  Selection.AutoFill Destination:=Range("I7:I42"), Type:=xlFillDefault
   Range("I7:I42").Select
  Selection.AutoFill Destination:=Range("I7:U42"), Type:=xlFillDefault
   Range("I7:U42").Select
End With

このマクロだと、ActiveCell.Fomulaの部分が黄色に塗られ、デバックが出ます。
With Rangeの部分は、正常に動きます。
フォローお願いいたします。

0 hits

【24445】ファイル同士の集計方法 ポポ 05/4/22(金) 13:37 質問
【24446】Re:ファイル同士の集計方法 G-Luck 05/4/22(金) 13:45 発言
【24449】Re:ファイル同士の集計方法 ポポ 05/4/22(金) 13:57 質問
【24453】Re:ファイル同士の集計方法 G-Luck 05/4/22(金) 14:09 発言
【24456】Re:ファイル同士の集計方法 ポポ 05/4/22(金) 14:25 質問
【24459】Re:ファイル同士の集計方法 G-Luck 05/4/22(金) 14:40 発言
【24461】Re:ファイル同士の集計方法 ウッシ 05/4/22(金) 14:42 回答
【24466】Re:ファイル同士の集計方法 G-Luck 05/4/22(金) 14:55 発言
【24472】Re:ファイル同士の集計方法 ポポ 05/4/22(金) 16:40 お礼
【24462】Re:ファイル同士の集計方法 m2m10 05/4/22(金) 14:48 発言
【24471】Re:ファイル同士の集計方法 ポポ 05/4/22(金) 16:35 質問
【24448】Re:ファイル同士の集計方法 m2m10 05/4/22(金) 13:50 発言
【24451】Re:ファイル同士の集計方法 ポポ 05/4/22(金) 14:05 質問

57024 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free