Excel vba 图表中的图例名称排序

Question

我画完图后，用vba录制了一个图例排序的宏，可是只有ActiveSheet.ChartObjects("图表 1").Activate， ActiveChart.PlotArea.Select两句，我在"选择数据"中上下移动调整系列名称次序的步骤没有录制进去，请问用vba怎么排序？（是Excel图表上图例的系列名称排序，不是Excel表格里内容的排序） 拜谢

Answer 1

ChartObjects("图表 1").Chart.FullSeriesCollection("系列1").PlotOrder = 1
ChartObjects("图表 1").Chart.FullSeriesCollection("系列2").PlotOrder = 2
ChartObjects("图表 1").Chart.FullSeriesCollection("系列3").PlotOrder = 3

Answer 2

用EXCEL VBA最好用office2003，如果用03录制就可以录到，到03以上版本VBA兼容性较差，有的它录完的代码，不要动再重新执行都有问题。
所以建议到03版本上做，03以上版本直接在VS开发里做。

追问

能帮我录一下吗，具体操作如下图所示，谢谢。告诉我录完的代码就行。