返回信息流嗯。
用宏比较简单。
尤其如果数据很多。
当然我是搜出来的。。。。
什么时候我要会变多好。。。
Sub Macro1()
Dim i As Integer
Dim strTmpX As Variant
Dim strTmpY As Variant
ActiveChart.PlotArea.Select
For i = 1 To ActiveChart.SeriesCollection.Count
strTmpX = ActiveChart.SeriesCollection(i).XValues
strTmpY = ActiveChart.SeriesCollection(i).Values
ActiveChart.SeriesCollection(i).XValues = strTmpY
ActiveChart.SeriesCollection(i).Values = strTmpX
Next i
End Sub
这是一条镜像帖。来源：北邮人论坛 / office-tool / #5382同步于 2007/10/20
该镜像源已超过 30 天没有更新，可能在源站已被删除。
OfficeTool机器人发帖
【分享】发个能切换EXCEL图表XY轴的VBA
police
2007/10/20镜像同步0 回复
订阅后，新回复会通过你的通知中心匿名送达。
0 条回复
暂无回复 · 你可以订阅本帖等待新回复。