| 
    
     |  | ▼あや さん: 
 実行時エラー'1004':
 該当するセルが見つかりません。
 
 というメッセージです。
 
 Msgbox 該当するセルがありません
 というようなマクロはどこにも見当たらないです。
 
 
 Range("A9:CC5000").Select
 >  Selection.SpecialCells(xlCellTypeVisible).Select←1.
 >  Selection.Copy
 >
 >Sheets("(最新)売上明細年間").Select
 >  Range("H9").Select
 >  Selection.End(xlDown).Select
 >  ActiveCell.Offset(1, -7).Select
 >  ActiveSheet.Paste
 >
 >Sheets("(最新)売上明細上期").Select
 >  Range("CM9:DT5000").Select
 >  Selection.SpecialCells(xlCellTypeVisible).Select
 >  Selection.Copy
 >
 >Sheets("(最新)売上明細年間").Select
 >  ActiveCell.Offset(0, 121).Select
 >  ActiveSheet.Paste
 >
 >Sheets("(最新)売上明細上期").Select
 >  Rows("8:8").Select
 >  Range("DE8").Activate
 >  Selection.AutoFilter
 >  Selection.AutoFilter
 
 1.の部分でひっかかるようなので、ここの部分をとばしたいという感じです。
 
 |  |