excel积分怎么输入

1.Excel中怎么积分

Excel中积分方法：使用VBA模块，建立新的宏定义，输入下面公式：1PublicFunction梯形积分（rAsString,aAsDouble,bAsDouble,nAsInteger）,iAsInteger3dx=(b-a)/n4Fori=1Ton5梯形积分=梯形积分+fx(r,(a+dx*(i-1/2)))*复化辛普生积分（rAsString,aAsDouble,bAsDouble,nAsInteger）,iAsInteger,mAsInteger10m=2*n11dx=(b-a)/m12复化辛普生积分=fx(r,a)+fx(r,b)13Fori=2TomStep214复化辛普生积分=复化辛普生积分+4*fx(r,(a+dx*(i-1)))+2*fx(r,(a+dx*i))15Nexti16复化辛普生积分=（复化辛普生积分-2*fx(r,(a+dx*m)))*dx/(fAsString,xAsDouble)AsDouble19f=LCase(f)20fx=Evaluate(Replace(f,"x",x))21EndFunction这个积分的公式要求两个函数的参数都是：1。

积分函数，自变量用x表示，x不区分大小写2。积分下限3。

积分上限4。划分次数，不能大于32766，对于梯形积分，越大越接近真值，对于复化辛普生积分，没必要使用大的划分次数积分区间包含奇点（趋近于无穷的点），复化辛普生公式将不能正确积分。