The following code as you know chooses the data to Row 390:

 ActiveChart.SeriesCollection(1).Values = "='1'!$A$2:$A$390"

What is the phrase to select automatically to the end of Column A as the 390 might be different in different files.
Many thanks

有帮助吗?

解决方案

ActiveChart.SeriesCollection(1).Values = Range(Range("A2"), Range("A2").End(xlDown))
许可以下: CC-BY-SA归因
不隶属于 StackOverflow
scroll top