ご回答ありがとうございました。
エクセルスレはどうも人が居ないようなので助かりました。
後一つ質問があるのですが、
0,0,0,0,0,10,20,0,0,0,30,40,20,30
のように数字が並んでいるとき、0を飛ばして並び替え直すにはどうすればいいでしょうか？
上の数字の並びを、
10,20,30,40,20,30の様に並ばせたいのです。
よろしくお願いします。