Edit chart seriescollection within a "With" - "End With" Block

I really appreciate your reply.

I wrote the first code as:

Sub editseriescollection()
    With ActiveSheet.ChartObjects("Gráfico 1").Chart
        .FullCollection(2).Values = Range("A2", Range("A2").End(xlDown))
        .FullCollection(1).XValues = Range("E2", Range("E2").End(xlDown))
    End With
End Sub

VBA displays 'Error 438 Object does not support this property or method' here:

.FullCollection(2).Values = Range("A2", Range("A2").End(xlDown))

Sub editformarfill()

With second code:
Set ch = ActiveChart.FullSeriesCollection(1) .Format.Fill.Visible = msoFalse
End Sub

VBA displays 'Error 438 Object does not support this property or method' here:

Set ch = ActiveChart.FullSeriesCollection(1) .Format.Fill.Visible = msoFalse

I am trying to write codes inside a With End With Block.
Moreover, I tried to declare variables such as.

Dim ws As Excel.Worksheet, xlChart As Excel.ChartObject
Set ws = wb.Sheets("qry_123")
Set xlChart = ws.ChartObjects(1)

I spent hour and hours googling and I did not find similar code examples.

Any help is really welcome

Cheers