返信ありがとうございます。
ご指摘いただいた箇所は修正して完成させることができました。
あとひとつ質問なのですが、セルを初期化したくて
sheet.Rows("5:50").Delete()
というコードを追加したらCOMが正常に解放されなくなりました。
どうしてでしょうか？？