みなさんありがとうございます。こんな夜中にすぐにプログラムを
作って頂いて大変感謝しています。
早速試してみましたところ、全て期待通り動きました。感激です。
せっかく作ってもらっておきながら、気になった点を言いますと、
うっかりシート全体を選択して実行すると(EXCEL2010)、
>>956
>>960
10秒くらいかかりました。（わたしのパソコンが遅いのかもしれませんが）

>>962
>>965
オーバーフローしました。

もし解決方法が有りましたら教えてください。
シート全選択時でも１秒以内くらいが理想です。