Por meio do VBA, é possível alterar o X- valores mínimo e máximo do eixo .
Exemplo
Dim TermLength
'Assumes the project term length is stored in cell A1 on Sheet1
TermLength = Sheets("Sheet1").Range("A1").Value
With Charts("Chart1").Axes(xlCategory)
.MaximumScale = .MinimumScale + TermLength
End With