Excel宏3D图表

时间:2011-02-01 12:38:40

标签: excel-vba vba excel

我在一张表中有以下数据:

x y offset

1 1 2

1 2 2

1 3 3

1 4 4

2 1 5

2 2 6

2 3 2

2 4 2

3 1 3

3 2 4

3 3 5

3 4 6

4 1 8

4 2 7

4 3 0

4 4 9 我想使用excel宏以三维方式显示偏移量。换句话说,这里x和y是坐标,偏移是z值。我只想在xy平面上得到一个表面/列。我在互联网上搜索了一段时间,但没有找到太多有用的东西。你能给我一些提示吗?

提前致谢,

约翰

1 个答案:

答案 0 :(得分:1)

如果您重新格式化数据,您将能够使用常规Excel图表类型(3D列)来绘制数据图表:

    1   2   3   4
1   2   2   3   4
2   5   6   2   2
3   3   4   5   6
4   8   7   0   9

enter image description here

VBA代码:

Sub graphData()
    Range("D3:H7").Select
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.SetSourceData Source:=Range("'Tabelle1'!$D$3:$H$7")
    ActiveChart.ChartType = xl3DColumn
End Sub

您必须相应地设置范围。