6000,15%,IF(A1>3000,14%,IF(A1>2000,12%,IF(A1>1150,10%,))))*A1) 若A1固定道为整数的情况版,以下公权式精简一些" />
乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > 用Excel计算积分?如何进行?-excel计分函数,函数公式excel

用Excel计算积分?如何进行?-excel计分函数,函数公式excel

作者:乔山办公网日期:

返回目录:excel表格制作


B1公式下拉:(公式加入当A1为空白时,公式也返回空白的判断。) =IF(A1="","",IF(A1>6000,15%,IF(A1>3000,14%,IF(A1>2000,12%,IF(A1>1150,10%,))))*A1) 若A1固定为整数的情况,以下公式精简一些: =IF(A1="","",LOOKUP(A1,{0,0;1151,0.1;2001,0.12;3001,0.14;6001,0.15})*A1)

1 Public Function 梯形积分(r As String, a As Double, b As Double, n As Integer) As Double 2 Dim dx As Double, i As Integer 3 dx = (b - a) / n 4 For i = 1 To n 5 梯形积分 = 梯形积分 + fx(r, (a + dx * (i - 1 / 2))) * dx 6 Next i 7 End Function 8 Public Function 复化辛普生积分(r As String, a As Double, b As Double, n As Integer) As Double 9 Dim dx As Double, i As Integer, m As Integer 10 m = 2 * n 11 dx = (b - a) / m 12 复化辛普生积分 = fx(r, a) + fx(r, b) 13 For i = 2 To m Step 2 14 复化辛普生积分 = 复化辛普生积分 + 4 * fx(r, (a + dx * (i - 1))) + 2 * fx(r, (a + dx * i)) 15 Next i 16 复化辛普生积分 = (复化辛普生积分 - 2 * fx(r, (a + dx * m))) * dx / 3 17 End Function 18 Public Function fx(f As String, x As Double) As Double 19 f = LCase(f) 20 fx = Evaluate(Replace(f, "x", x)) 21 End Function 两个函数的参数都是1.积分函数,自变量用x表示,x不区分大小写2.积分下限3.积分上限4.划分次数,不e68a84e8a2ad7a686964616f331能大于32766,对于梯形积分,越大越接近真值,对于复化辛普生积分,没必要使用大的划分次数积分区间包含奇点(趋近于无穷的点),复化辛普生公式将不能正确积分,将来可能会修正也希望高手出招调用方法:=梯形积分("sin(x)^3-ln(x+1)^3+x^5-x", 0, 2, 2000)
貌似Excel没有微积分功能函数。
如果你用Excel实现了微积分自动解算,就不用研究matlab之类的大程序了。
给出具体某一个题目,让网友用Excel帮助比较现实点儿。

Excel中只能实现带积分符号的函数显示,而不能实现积分的运算。
显示函数可以使用插入公式来进行编辑显示。
专业的公式编辑器可以编辑所有的公式功能。它无论是Word、Excel还是PowerPoint中都可以使用。
退出公式编辑器就可以见到完整的公式了。

同时需要注意的是,公式编辑器是OFFICE在安装时的一个选项,如果在安装时此项没有选的话,是不能进行公式编辑的。遇到没有安装的情况,可以通过重新更改安装OFFICE来解决。

相关阅读

  • -excel函数姓名,函数公式excel

  • 乔山办公网excel表格制作
  • 设张三 -1,知 -2 ,10在道sheet1的ABCD列,在sheet2A列输入=if(and(sheet1!专B1>0,sheet1!C1>0,sheet1!D1>0),sheet1!A1,"")B列输入=if(and(sheet1!B1>0,sheet1!C1>0,sheet1!D1
关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网