举例说明。例如要做一个单元格求和的自定义函数,比sum函数增加一个条件,就是如果单元格有删除线标记,则不计入该单元格的数值。如图:第一步:在visual basic模式下插入模块,并创建自定义函数。代码如下:Public Function mysum(qu As Range)Dim s As DoubleDim bmysum = 0For Each b In quIf b.Font.Strikethrough = False Then mysum = mysum + b.ValueEnd IfNextEnd Function第二步:在c15单元格输入公式:=mysum(C4:C14)。结果如图:1、点击“工具”中的“宏”,选择“Visual Basic编辑器”项(按“Alt+F11”快捷键一样效果),如图。2、在执行1步骤后跳出“Visual Basic编辑器-Book1”窗口,如图。3、在“Visual Basic编辑器-Book1”窗口中,点击“插入”中的“模块”项,如图。4、执行3步骤,会跳出如下命令窗口,如图。5、在“Book1-模块1(代码)”窗口里输入:Function S(a, b)S = a * b / 2End Function如图。6、Function S(a, b)是定义函数及参数的,自定义函数必须首先这么定义自己的函数,然后以End Function作结束。输入完毕,关闭窗口,自定义的函数就完成了。7、下面看看我们自定义的函数实际的运用,如图中的两组数据,我们来计算面积。8、表格中,点击C3单元格,在fx处输入“=S(A3,B3)”就行了,只要一回车确定,面积就出来了,如图。9、C4单元格面积的确定,和C3单元格一样,只是“=S(A4,B4)”依次类推。其实,其他函数也差不多类似这样做,只是有时候自定义复杂函数,需要基本的数学知识和VBA基础,这需用自身的积累。1、点击“工具”中的“宏”,选择“Visual Basic编辑器”项(按“Alt+F11”快捷键一样效果)2、在执行1步骤后跳出“Visual Basic编辑器-Book1”窗口,3、在“Visual Basic编辑器-Book1”窗口中,点击“插入”中的“模块”项4、执行3步骤,会跳出如下命令窗口5、在“Book1-模块1(代码)”窗口里输入:Function S(a, b)S = a * b / 2End Function6、Function S(a, b)是定义函数及参数的,自定义函数必须首先这么定义自己的函数,然后以End Function作结束。输入完毕,关闭窗口,自定义的函数就完成了。7、下面看看自定义的函数实际的运用,如图中的两组数据,我们来计算面积。8、表格中,点击C3单元格,在fx处输入“=S(A3,B3)”就行了,只要一回车确定,面积就出来了9、C4单元格面积的确定,和C3单元格一样,只是“=S(A4,B4)”依次类推。其实,函数也差不多类似这样做,只是有时候自定义复杂函数,需要基本的数学知识和VBA基础,这需用自身的积累。
分享题目:excel如何设置函数,Excel中函数怎么设置
分享地址:http://kswjz.com/article/iseiec.html