Excel的较高级问题 [复制链接]

如图，图中是一条曲线，其中直线部分应用了第14－第27行的数据（见图中椭圆框）。假如我要在C1与C2中输入起点与终点的行数，修改直线的起点与终点。请问高手，如何将输入的起点与终点的行数（见圆形框）与椭圆框中直线起点与终点链接，才能由C1、C2中的数据控制自动更新回归直线。

o,my god,这是vba的功能了

这个从输入框直接连接，俺是没有实现过！如果是做模板 就可以用VBA了！

编模块和直接从单元格输入差不多,都可以用VBA来实现,程序代码如下:
    i = Sheet1.Cells(1, 3)
    j = Sheet1.Cells(2, 3)

    Range("A" & i & ":b" & j).Select
    Charts.Add
    ActiveChart.ChartType = xlXYScatter
    ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("A" & i & ":b" & j), PlotBy _
        :=xlColumns
    ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"

    由于没有看到还要回归直线,所以上面的程序差一点,现在补上,用红色的表示
    i = Sheet1.Cells(1, 3)
    j = Sheet1.Cells(2, 3)

    Range("A" & i & ":b" & j).Select
    Charts.Add
    ActiveChart.ChartType = xlXYScatter
    ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("A" & i & ":b" & j), PlotBy _
        :=xlColumns
    ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"
    ActiveChart.Axes(xlValue).MajorGridlines.Select
    ActiveChart.SeriesCollection(1).Select
    ActiveChart.SeriesCollection(1).Trendlines.Add(Type:=xlLinear, Forward:=0, _
        Backward:=0, DisplayEquation:=False, DisplayRSquared:=False).Select

把我做好的EXCEL也传上来,以便参考

我觉得很符合楼主的意思啊!不知道版主看过和用过没有?

5楼提供的实例不能满足我的要求

引用第7楼hujg于2009-06-11 12:09发表的 :
5楼提供的实例不能满足我的要求

想直接连接完成  好像不行！！！

下午看看4楼的VBA是否好用，先谢谢4楼了