knrt.net
当前位置:首页 >> ExCEl vBA FinDnExt这个函数我哪里用错了 >>

ExCEl vBA FinDnExt这个函数我哪里用错了

参数错了.这个函数的参数只能是搜索范围内的单个单元格,而你的c(1)在前面得到的是查找到第一个单元格的地址,是一个字符串变量.参数应该改为:After:=Range(c(1))

findnext里的参数必须是一个单元格对象,所你这里vl是一个值,就不行了 你参考一下vba帮助里关于find的示例吧: 示例 本示例在第一个工作表的单元格区域 A1:A500 中查找包含值 2 的所有单元格,并将这些单元格的值更改为 5. With

Sub Myfind() Dim iRange As Range, iFined As Range Dim iStr, iAddress As String, N As Integer'以上是定义使用到的变量 Set iRange = Range("A2:A100") '给irange变量赋值为A2:A100区域 iStr = Range("A1").Value '给要查找的字符串变量

alt + f11看看,里面有没有check_click这个函数.估计这个函数被误删了你创建一个应该就可以了.

find函数外套一个isnumber函数下面的IF语句相应改一下

select case 后面不要跟A,要跟参数

公式大概是 =COUNTIFS(sheet3!$C3:sheet3!$C1000,B5,sheet3!$L3:sheet3!$L1000,C4)即把B5/C4的""符号去掉,我用的是03没法试

操作说明: 1、将《裕度边坡》表A14:A37,设置成黄色区域样式. 2、为检验公式效果,将《裕度边坡》表C14:C37均填充数据,如粉红区域所示. 3、将《裕度边坡》表A14:A37“代码”作为查找条件之一,改O2★分段查找原公式为“=SUMPRODUCT((裕度边坡!$A$14:$A$37=IF(M2 全部

Option ExplicitType a a(2, 4) As IntegerEnd TypePublic Function test() As aDim i As Integer, j As IntegerFor i = 1 To 2 For j = 1 To 4 test.a(i, j) = i * j Next jNext iEnd FunctionSub hj1()Dim i As Integer, j As IntegerFor i = 1 To 2 For j = 1 To 4 ActiveCell

=OR(ISNUMBER(FIND(B5,A$2:A$6)))按三键CTRL+SHIFT+ENTER结束公式输入下拉填充,上拉填充公式结果为TRUE的即为含有此姓.

网站首页 | 网站地图
All rights reserved Powered by www.knrt.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com