Equalize Character Height > Error: Method 'TextFrame2' of object 'ChartFormat' failed

Hi, I am a fairly advanced vba user but self taught. I am having trouble trying to equalize the height of font on my x and y axis in a chart using Excel 2010. I am using Lucida console as the font and manually I can change the font by selecting the axis and either right clicking or going to the home > font options and selecting the Equalize Character Height check box. I have only found a few threads and a google book on fonts2 and the equalize property. I understand the format property on the axis is read only and some people have been able to use a work around but I have not been successful trying pretty much every option. I know this was reported as a bug in 2010 but I cannot seem to find any resolution, link.

Only documentation I can find: msdn link

Without trying to define the solution my basic requirement is to be able to display 124 date records legibly in the x axis. The best font I have found is lucida console size 8 with the equalize character height check box. If someone can suggest another font format I can set through VBA that is legible on screen and when printed that would be great also.

I have tried many variations of the below code including setting as an object and selecting the axis first but with little success. With that said what I am basically trying to do is this... or find a more legible font for 124 dates

Please Login or Register  to view this content.

Thanks,
Kick