"オブジェクトサポート"エラーを返すVBAチャートの更新

Question

ちょっと、毎月のデータからマクロを使用してこのチャートを更新しようとしていますが、構文エラー？

With Sheets("data").ChartObjects("Chart 3") 
    .SeriesCollection(1).XValues = ActiveSheet.Range(Range("b55"), Range("b55").End(xlDown)) 
    .SeriesCollection(1).Values = Range(Range("u55"), Range("u55").End(xlDown)) 
    .SeriesCollection(1).Name = "Hi" 'Range("u54") 
End With 

は私も少しそれをクリーンアップするためにWithブロックにSeriesCollection文を追加してもらえますか？

Answer 1

With Sheets("data").ChartObjects("Chart 3") 

ChartObjectには、実際のチャート自体