VBA code to make x-axis labels of an Excel chart be vertical

Hi,

I posted this question earlier in the Charts forum (http://www.excelforum.com/excel-char...-vertical.html) but didn't get a response, so was thinking this forum may be more appropriate.

I have a chart with input data that changes. That results in the x-axis labels sometimes being vertical, slanted, or horizontal.

Is there a way to have a piece of vba code that detects the slant direction of the data labels and automatically adjusts the chart width to achieve vertical data labels?

Thanks!

Superb!!! That worked very well. Thanks Andy.