Sub今回は、新しいメソッドやプロパティは登場しません。多くの場合、既知の技術で解決できるはずです。要は、ロジックの組み立て方になります。当然のことながら、今回の回答も、あくまで例に過ぎず、これがベストだというわけではありません。それでも、概ねこのような考え方で処理することになろうとは思います。Columns(6)).ClearContentsこの部分は、いろいろと書き方がありますね。6).End(xlUp).Offset(1)).ClearContentsこんな書き方でも良いです。コード内にコメントを記していますので、ステップインで、変数の動きを確認しつつ読み解いて下さい。練習問題29(ロット引き当て)回答このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。掲載のVBAコードは自己責任で使ってください。万一データ破損等の損害が発生しても責任は負いません。