データ列を追加 をすると 1900/1/0 となります。

ありがとうございます。

実は、以前教えて頂いた日付計算の方法 を使用し、作成中なのですが、
以下のエラーが出るようになってしまいました。
デバックでは作業時間が掛かるので、
エラー直前の値が見る為に、このExcelへの書き込みを入れました。

現在のエラー