Excel绘制曲线如何控制横、纵坐标的相对比例

sunphoenix

现在任务的需求是绘制二维曲线，要求对横轴、纵轴的相对几何比例进行控制。
譬如说：横轴是从0到10，纵轴是从0到100，现在要求坐标图中横轴上从0到1的距离与纵轴上从0到10的距离长度相等。
请问这样要如何实现呢？拜谢各位大牛先~

ralfclerk

两个轴的代表意义不同，不能用长度说相等；即使你做到了，那么我把图形拉大的话，你说还能相等吗

single_star

用VBA来设定图表绘图区的高(height)及宽(width)
'选定图表后执行以下宏可产生长宽相等绘图区(内部)
Sub Macro1()
    w0 = ActiveChart.PlotArea.Width
    w1 = ActiveChart.PlotArea.InsideWidth
    w2 = ActiveChart.PlotArea.InsideWidth   
    h0 = ActiveChart.PlotArea.Height
    h1 = ActiveChart.PlotArea.InsideHeight
    h2 = ActiveChart.PlotArea.InsideHeight
    If w1 > h1 Then w2 = h1
    If h1 > w1 Then h2 = w1
    ActiveChart.PlotArea.Select
    Selection.Width = w0 - (w1 - w2)
    Selection.Height = h0 - (h1 - h2)
End Sub

single_star

上面的代码是不改变图表外长及外宽的,故绘图区会自行适度缩短
也可改写代码使图表填满后放大调整

sunphoenix

single_star 发表于 2011-11-15 11:27
上面的代码是不改变图表外长及外宽的,故绘图区会自行适度缩短
也可改写代码使图表填满后放大调整

感谢高手回复~我试一下先~

andy800529

single_star 发表于 2011-11-15 10:55
用VBA来设定图表绘图区的高(height)及宽(width)
'选定图表后执行以下宏可产生长宽相等绘图区(内部)
Sub M ...

这个问题是不是只有通过VBA来解决啊？

andy800529

single_star 发表于 2011-11-15 10:55
用VBA来设定图表绘图区的高(height)及宽(width)
'选定图表后执行以下宏可产生长宽相等绘图区(内部)
Sub M ...

我对这个代码的理解：
最终是使长宽相等。
而且是用小的那个作为最终的结果。