求excel中两个曲线交点

来源：学生作业帮编辑：大师作文网作业帮分类：综合作业时间：2024/11/10 12:33:12

求excel中两个曲线交点

曲线是由数据组成的,希望用函数或者VBA的方法求曲线的交点.（数据1中的数据多少不定）

如图,CommandButton1的程序如下：

Private Sub CommandButton1_Click()
Dim i As Integer, j As Integer
[e1].Formula = "=MDETERM(F1:H3)"
[f7:g7].ClearContents
For j = 2 To Range("C65536").End(xlUp).Row - 1
  For i = 2 To Range("A65536").End(xlUp).Row - 1
    [f1] = Cells(j, "c")
    [g1] = Cells(j, "d")
    [h1] = 1
    [f2] = Cells(j + 1, "c")
    [g2] = Cells(j + 1, "d")
    [h2] = 1
    [f3] = Cells(i, "a")
    [g3] = Cells(i, "b")
    [h3] = 1
    [i1] = [e1]
    [f3] = Cells(i + 1, "a")
    [g3] = Cells(i + 1, "b")
    [h3] = 1
    [i2] = [e1]
    [f1] = Cells(i, "a")
    [g1] = Cells(i, "b")
    [h1] = 1
    [f2] = Cells(i + 1, "a")
    [g2] = Cells(i + 1, "b")
    [h2] = 1
    [f3] = Cells(j, "c")
    [g3] = Cells(j, "d")
    [h3] = 1
    [j1] = [e1]
    [f3] = Cells(j + 1, "c")
    [g3] = Cells(j + 1, "d")
    [h3] = 1
    [j2] = [e1]
    If [i1] * [i2] <= 0 And [j1] * [j2] <= 0 Then
      [f7] = Cells(i, "a") - [i1] / ([i2] - [i1]) * (Cells(i + 1, "a") - Cells(i, "a"))
      [g7] = Cells(i, "b") - [i1] / ([i2] - [i1]) * (Cells(i + 1, "b") - Cells(i, "b"))
      Exit For
    End If
  Next i
  If [f7] <> "" Or [g7] <> "" Then Exit For
Next j
End Sub
执行后,若有交点则显示在F7:G7

几何画板中如何绘制两函数交点,两个曲线 EXCEL中求两个时间差在excel中如何求两条曲线的交点?（x、y轴数值都不同的）有两个曲线其中一个方程已知另一个方程中有一个未知量为X 求两曲线有交点时 X的取值范围如果上题中其中一个曲线为直我在excel中绘制了xy坐标的曲线,我想求曲线的斜率, 如何在excel一个图表中显示两个曲线,同一个自变量,不同的因变量? excel求两个未知数在excel中如何作函数曲线? excel中如何求曲线在某一点的切线斜率在excel中画图后如何求曲线与x轴围成的面积 EXCEL中如何求两个表格的表达式的值. 两个圆的曲线方程的交点的直线的方程怎么求?根据什么公式得来的.