如何改變mschart中Title的位置(編號：4066)

我要自動改變Mschart中Title 的位置,程式如下:
with frmChart1.chart1.title.vtfont
.Location.Rect.Min.Y = frmChart1.Chart1.Height - screen.TwipsPerPixelY * 50
　　.Location.Rect.Max.Y = frmChart1.TChart1.Height - Screen.TwipsPerPixelY
End With
程式執行後發現,Title並沒有移動,但是當我用手動的移動一次此Title 的位置後,再執行一次這行程式,則它就會移動到如程式控制的位置了,請問此問題要如何解決...