Come impostare l'asse X a livello di codice su un grafico?

Question

Ho un grafico in un foglio di lavoro in Excel e ho una macro impostata in modo che quando cambio il valore in una determinata cella l'intervallo di dati nel grafico è impostato su A2 in basso come fino al numero di riga corrispondente in questa determinata cella.

Quello che non riesco a fare è modificare l'asse poiché l'asse specificato non copre più l'intervallo del grafico, ovvero l'asse X corrente è impostato su:

=Sheet1!$C$2:$C$600

Non riesco a capire come posso aggiornarlo in una macro. Qualsiasi aiuto sarebbe molto apprezzato.

Answer 1

Dovresti essere in grado di impostare la proprietà XValues ??come hai fatto nella risposta di Lance per altra domanda .

Charts("chartname").SeriesCollection(1).XValues = "=MYXAXIS"

o come si chiama l'intervallo denominato per i valori dell'asse x. Se nel grafico sono presenti più serie, ti consigliamo di modificare il valore in SeriesCollection per fare riferimento alle serie giuste.

Answer 2

La cella "certa" " contenere l'ultimo numero di riga dei dati? (non è del tutto chiaro)

Supponiamo che la cella F1 contenga l'ultima riga nei dati. Puoi costruire un indirizzo e un intervallo come questo:

Dim rXVals As Range
Dim sAddress AS String

sAddress = "Sheet1!$C$2:$C<*>quot; & Worksheets("Sheet1").Range("F1").Value
Set rXVals = Range(sAddress)
Worksheets("Sheet1").ChartObjects(1).Chart.SeriesCollection(1).XValues = rXVals