Lost X-axis after resizing charts using VB - not sure why...

[WA]

Hi,
I used this code to resize a bunch of charts:

Set cellsToCover = Sheet1.Range(cell1 & ":" & cell2)
Set chartShape = ActiveChart.Parent
chartShape.Height = cellsToCover.Height
chartShape.Width = cellsToCover.Width
chartShape.Top = cellsToCover.Top
chartShape.Left = cellsToCover.Left

After resizing, the x axis labels have disappeared, but when I check the
chart settings, they are still enabled. I would like to maximize the size of
the chart within the border in order to keep the axis in tact. Any ideas on
how I could go about this in VB, would be a great help.

Thanks,

WA