Como definir X eixo programaticamente em um gráfico?

Question

Eu tenho um gráfico em uma planilha no Excel e eu tenho um conjunto macro de modo que quando eu mudar o valor em uma determinada célula da faixa de dados no gráfico está definido para A2 para baixo tanto quanto o número da linha correspondente no esta determinada célula.

O que eu não consigo ser capaz de fazer é modificar o eixo como o eixo especificado tampas não é mais o intervalo da curva ou seja, o eixo X atual é definida como:

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

Eu não consigo descobrir como posso atualizar isso em uma macro. Qualquer ajuda seria muito apreciada.

Answer 1

Você deve ser capaz de definir a propriedade XValues ??da mesma forma que você fez na resposta de Lance para a sua outro questão.

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

ou o que você ligue para o intervalo nomeado para os valores do eixo-x. Se você tiver várias séries em seu mapa, você vai querer alterar o valor em SeriesCollection para se referir à série direita.

Answer 2

O "determinada célula" conter o número da última linha de dados? (Que não é muito clara)

F1 celular Suponha que contém a última linha de dados. Você pode construir um endereço e vão como este:

Dim rXVals As Range
Dim sAddress AS String

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