Macro to hide columns with empty cells.

I am trying to formulate some code that will hide a range of columns if particular cells are empty in that column.

Attached is where I am after hacking around code found on here.

I am looking to filter the column under the date. then run code to remove all the empty columns it but only looking for blank cells in the range E27:DK100.

This it wlll then create a condensed version of the chart suitable for printing.

Any ideas would be appreciated.