Unhide column if range of cells contain data
 

I have a workbook with 2 worksheets named Quote and Collection.
The Collection worksheet has column headings in cols D to BI
Data entered in the Quote worksheet is transfered to the relevant cols in
Collection worksheet by means of "IF" formulas ie.
=IF(Quote!J8="Electrical",Quote!P8,0)
I would like to hide any cols in Collection worksheet that contain no data,
or even better to unhide those cols when they do contain data.
Any help would be appreciated

Malcolm