如何运用Excel中的VBA编程找到一个数在一个区域是否存在

来源:百度知道 编辑:UC知道 时间:2024/06/19 08:05:04
例如 Cells(4,4)中的数是否在Range("A1,D5")中存在
把Cells(4,4)改为Cells(1,6)吧 如果要调用函数 那怎样调用 要简单、可行
If Application.Evaluate("sum(--(a1:d5=f1))") Then中的--有什么用

If Application.Evaluate("sum(--(a1:d5=f1))") Then

对补充问题的回复:
--是将逻辑值TRUE或FALSE转换成数值1或0

好多方法啦,循环、调用EXCEL函数。。。等等等,任你选择一种都行。

比如循环 假设i为行j为列
for i =1 to 5
for j=1 to 4
if cells(i,j)=cells(1,6) then
msgbox "存在相同值,位置是:第"& i & "行,第"& j &"列"
else
msgbox"没找到相同值"
endif
next j
next i
=============
函数的话,你用数组公式就行了。

if Application.Worksheetfunction.countif(Range("A1,D5"),Cells(1,6))>0 then ...

函数前加两个 “--”是做什么用的?