EXCEL函数数组公式转VBA代码

如题所述

第1个回答 2019-08-20

公式一般比vba快，因为vba是解释执行的。
你公式慢的因为是有些写法不合适，建议：
1.增加辅助列，第一列写c1=d1,,,C:C=C1,，，实际上应该怎么写，你调整下
2.不要整列的用数组公式，你这个C:C=C1，有效数有多长就写多长，适当多一点没关系，
但整列，当然就慢的厉害了，改为C1:C1000=C1会极大的改改善公式速度。
C:C=C1在数组公式中，大约是从C1...C65536单元格，逐一跟C:C比较，在2003下是65536*65536次运算，在07下去运算一次，1048576*1048576次计算比较，10分钟才算完，不慢了，呵呵
完善下公式就OK，不用写什么VBA

第2个回答 2019-07-08

这里本来就是vba代码呀？你要转成excel函数？？
if(if(d1）*pi/180>=0,if(cos(b1）*pi/180-i1*pi/180)<0,true,false),if(cos(b1）*pi/180-i1*pi/180)>0,true,false)),"-1","1")
这里面有变量，反正就是把cell()这一块换成单元格地址就行了；
好像是经纬度转换，对不？

相似回答

excelVBA代码怎么在单元格中输入数组公式答：Sheet3.Range(“B1:B6”).FormulaArray= “=A1:A6=”” Excel”””Sheet3.Range(“B1”).Value= “excelperfect”会导致错误。可以先判断要修改的单元格是否处于数组公式区域，例如：With Sheet3 .Range(“B1:B6″).FormulaArray =”=A1:A6=”” Excel”””With .Range(“B1”)If .HasArray...

excel 数据求和公式或自动填充数据VBA代码答：'自定义公式-按ALT+F11-插入模块-粘贴代码-将表格另存为启用宏的格式Function 统计(a As Range, d As String)lastrow = Range("a65536").End(xlUp).RowSet b = Range("a2:a" & lastrow).Find(d)If Range("b" & b.Row + 2) = "" Then c = b.Row + 1Else c =...

Excel三行代码完美替代宏表函数EVALUATE答：C1单元格填写公式 =evaluatevba("=max({"&B2&"})") 或=MAX(evaluatevba("

用vb怎么做excel表格答：EXCEL函数公式直接操作的是数组，完全可以达到循环的目的，可以理解为是封装了的循环函数，下面举两个例子来说明：问题1: 条件求和公式SUMIF，求序号大于3的数据的和。a. 用函数公式就非常简单在C2单元格输入=SUMIF(A2:A6,">3",B2:B6)就能行到结果42 b. 如果用VBA就复杂多了，代码如下：set sh...

大家正在搜

max函数数组公式 AVERAGE函数数组函数数组公式怎么输入 excel数组公式 if数组公式怎么理解 excel数组公式详解 excel数组函数 if 函数公式怎么用