1，你再写一个计算函数放到另一个单元格中，或者再次调用这个函数，做两次计算，每次返回一个结果。2，你可以把两个单元格的形参传到函数体内，跟据你的需要，填中不同的值即可。Functionmydd(aDataAsRange,aDataWA...

用VBA自定义的函数,可设置返回值为文本类型,用字符串变量将多个值组合成一个字符串值返回.

返回多个值是不可能的，任何编程语言都做不到。但是1、可以返回数组，如下例。2、vb/(vba/vbs)是默认按地址传递的，所以参数里的数被改变的，在父函数中也被改变了。数组参数也是一样。Functiona()Dimw(2)w(1)...

单个变量只能使用by在VB中，一个function只能用一个return语句返回一个值。哪怕有几个return语句，也只能执行一个。如果需要返回多个值，可以使用数组，数组的每一个元素值都可以带回来。单个变量只能在声明函数的某个参数时...

按地址引用参数就可以改变传进去的参数的值了。如下列所示代码：m和n就被函数addtest改变为3和4了。PublicFunctionaddtest(ByRefaAsInteger,ByRefbAsInteger)a=3b=4addtest=5EndFunctionSub...

PrivateSubCommandButton2_Click()CallCommandButton1_ClickEndSub2、如果有参数的话需要带上参数，比如PrivateSubCommandButton1_Click()CallMsgStr("这是过程/函数调用示例")EndSubSubMsgStr(strAsString...

1、首先打开excel在工具栏中找到开发工具，然后打开编辑页面，在页面上输入程序，如图所示，创建一个函数，也是比较方便的。直接使用function。2、然后给函数命名，函数名后面的括号内部需要写上函数的参数，这里有参数可以写，没...

楼主的需求描述明确一下要怎么返回两个值，保存在哪里？使用过程，直接写入相应单元格即可使用函数，只能是数组函数，返回值到两个单元格里

8TostTMS.Range("a1046876").End(xlUp).RowIfstFF.Cells(I,"A")=stTMS.Cells(J,"aa")And_stFF.Cells(I,"B")=stTMS.Cells(J,"L")And_stFF.Cells(I,"C".

0面积参数=0Else周长参数=2*3.14*半径参数面积参数=3.14*半径参数*半径参数EndIfEndSub以上代码是在Excel的VBA中调试的，可以满足的要求。