| 
    
     |  | ▼ポポ さん: 
 順番に解決していきましょう。
 
 > Workbooks(1).Worksheets(3).Activate
 >
 > Range("I7").Select
 > ActiveCell.Formula = myWb32.RC+ myWb33.RC + myWb34.RC + myWb35.RC + myWb36.RC+ myWb37.RC
 
 ここでは、何をしたいのですか?
 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
 
 ここは、I7をI7:U42にフィルしたいのであれば
 Range("I7").AutoFill Destination:=Range("I7:I42"), Type:=xlFillDefault
 Range("I7:I42").AutoFill Destination:=Range("I7:U42"), Type:=xlFillDefault
 だけでいいですよ。
 
 
 |  |