Windows10　マイクロソフトEXCEL365で稼働するマクロ依頼

WindowのEXCELで添付したサンプルのようなことが自動でできないかと 思い公開依頼をさせていただきました。 左側にある空白のセルを削除して左側にもってきたいのですが、 1行毎に空白セルの位置が違うためマクロやVBAで出来ないでしょうか？ かなり急ぎのためよろしくおねがいします。。 使用目的としてはカタログ製作で自動組をしているのですが、 クライアントからきたデータをサンプルのように加工しなければならないためです。 動かす環境ですが、 Window10　MicrosoftEXCEL365で動いてもらいたいです。