VBA中被Find的对象只能是值，不能是引用

最新推荐文章于 2022-03-19 10:18:57 发布
最新推荐文章于 2022-03-19 10:18:57 发布
阅读量564 收藏
点赞数
分类专栏： VBA
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/zengxy3407/article/details/78282590
版权

ABCDEF
1XY=B1=C1Y
2     


如上表格，D1和E1中内容为公式表达式

如果用Range("B1:C1").Find("F1")就可以返回C1，如果用Range("D1:E1").Find("F1")则返回Nothing


有木有好办法？


MotionCtrl_Seven
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
VBA常用对象属性示例大全
02-06
本文档中有VBA常用的部分函数，及常用woorkbook、worksheet、单元格操作示例代码
【原创】VBA学习笔记（7）VBA各种报错和原因备忘
奔跑的犀牛先生
03-29 1万+
1 数据错误：如果有时候代码报错，先看看数据是不是有问题 因为VBA代码（函数，公式）涉及的数据，如果有问题也会报错 因为数据引发的代码报错，这算是丧心病狂的报错吗？ 例子 range("a;a").specialcells(xlcelltypeformulas,16).select 如果范围内，没有报错单元格，会公式报错 例子 excel公式的vlookup 查询数据...
vba中find方法查找1
pgymeitianjinbu的博客
03-19 8439
注意：Find方法需要Range对象，也就是需要在单元格区域中查找。 不能在数组中查找。
汇编语言不允许通过的指令
long_long_later的博客
12-18 885
不允许通过的指令：   mov      段寄存器,数据 mov ds,1000h   add 段寄存器,寄存器 add ds，ax   add 寄存器,段寄存器 add ax，ds   sub  段寄存器,寄存器 sub ds，ax   sub 寄存器,段寄存器 sub ax,ds   8086cpu mov指令不能用于设置cs、ip的值，原因是8086没有提供这样的功能
关于查找方法(Find方法)的应用(一)
国际海员
01-26 6606
关于查找方法(Find方法)的应用(一)在Excel中，选择菜单“编辑”——“查找(F)…”命令或者按“Ctrl+F”组合键，将弹出如下图01所示的“查找和替换”对话框。在“查找”选项卡中，输入需要查找的内容并设置相关选项后进行查找，Excel会将活动单元格定位在查找到的相应单元格中。如果未发现查找的内容，Excel会弹出“Excel找不到正在搜索的数据”的消息框。500){this.resize
VBA中find使用解释
weixin_30656145的博客
07-01 908
转载于:https://www.cnblogs.com/Young-shi/p/11115632.html
VBA常用技巧
12-21
技巧17 双击被保护单元格时不显示提示消息框 12 技巧18 重新计算工作表指定区域 12 技巧19 录入数据后单元格自动保护 12 技巧20 工作表事件Target参数的使用方法 12 20-1 使用单元格的Address 属性 12 20-2 使用...
Excel VBA实用技巧大全 附书源码
10-08
01015获取在Excel主窗口中一个窗口所能占有的最大高度和宽度 01016获取当前打印机名称 01017获取MicrosoftExcel剩余内存 01018获取MicrosoftExcel的总内存 01019获取计算机被Excel占用的内存 01020改变Excel窗口大小...
VBA编程技巧大全
08-05
技巧17 双击被保护单元格时不显示提示消息框 58 技巧18 重新计算工作表指定区域 60 技巧19 录入数据后单元格自动保护 60 技巧20 工作表事件Target参数的使用方法 62 20-1 使用单元格的Address 属性 62 20-2 使用...
传值调用与引用调用
菌哥--专栏
07-19 1082
using System;class MethodCall{ public static void Main()  {  /*   * 参数类型分为 in, ref, out 三种，默认为 in。   * in 类型在子方法中修改了对应变量后，主方法中的值不会发生改变。   * ref 类型在子方法中修改了对应变量后，主方法中的值也会发生改变。   * out 主方法中对应的变量不需要初始化。  
VBA Find函数的常见用法
热门推荐
weixin_38294935的博客
05-04 5万+
学习杨老师的全民一起vba课程内容整理：Find语法： Range.Find(What,After,LookIn，LookAt,SearchOrder,SearchDirection,MatchCase,MatchByte,SearchFormat)（）What：唯一一个必选参数，含义为需要查询的内容，特点为变体类型，可以接受数字，字符串，日期等数据类型此外，该参数可以接受通配符。常用通配符？一个...
索引
chenxin0312的博客
08-24 498
索引 1、索引 索引(MySQL中也叫"key键")：是存储引擎快速查询记录的一种数据结构 2、索引存储类型 InnoDB引擎使用的是B+Tree 3、索引类型 （1）主键索引(PRIMARY KEY)：值必须唯一，不允许有空值，一般是在创建表的同时创建主键索引，一个表只能有一个主键索引 （2）唯一索引(UNIQUE)：唯一索引列的值必须唯一，但允许有空值 ALTER TABLE 表名 ADD UNIQUE(字段名称) （3）普通索引(INDEX)：最基本的索引，没有任何限制 ALTER TABLE 表名
分析某监控软件解密加密狗过程
weixin_34161029的博客
04-18 707
本文转自http://www.jiamigou.net/crack/225.html 这个监控类的软件，由于加密狗遗失，只能爆破了。 用PEID检测为Microsoft Visual Basic 5.0 / 6.0，无壳。 试运行软件，弹出提示：Can’t Open Dog! 用OD加载程序， 程序入口： 004135A4 > $ 68 1062410...
举例：VB.net开发Excel程序，find函数的参数如何写？
lyc1519的博客
05-23 1937
边学边收集：VB.net开发Excel程序，find函数的参数如何写？Dim BBlb As Excel.Range                        Dim BlbAddress As Integer 'String ''With ExLapp.ActiveSheet    BBlb = .range(ExLapp.Cells(trow - 1, Blb), ExLapp.Cells...
【原创】VBA学习笔记（3） VBA错误类型和调试方法
奔跑的犀牛先生
03-28 3173
一 认识程序里的三类错误 1.1 编译错误（语法错误）： 比如拼写错误，符号错误，格式错误等等 ，一般是比较低级的错误 运行前，编译时就会报错的 因为代码运行前，编辑器会先检查语法错误 VBA里的编译错误，就是写在VBE里，还没运行就报错的那类错误 1.2 运行错误（和数据关系较大）： 运行时才会出错的错误 比如一个语句运行时发现此操作会无法进行，卡住，或者返回值报错等等 这...
find vba 模糊_关于查找方法(Find方法)的最通俗教程
weixin_35231842的博客
02-01 2318
拉框中的选项。(5)参数LookAt，可选。可以为以下常量之一：XlWhole或者xlPart，用来指定所查找的数据是与单元格内容完全匹配还是部分匹配，默认值为xlPart。对应于“查找与替换”对话框中，“单元格匹配”复选框。(6)参数SearchOrder，可选。用来确定如何在单元格区域中进行查找，是以行的方式(xlByRows)查找，还是以列的方式(xlByColumns)查找，默认值为xlB...
在Excel中使用VBA的find来返回找不到的数据
最新发布
09-26
### 回答1： 如果在Excel中使用VBA的find函数找不到数据，则可以返回“Nothing”。例如： ``` Set foundCell = Worksheets("Sheet1").Columns(1).Find(What:="Data", LookAt:=xlWhole) If foundCell Is Nothing Then MsgBox "Data not found" Else MsgBox "Data found at " & foundCell.Address End If ``` 在上面的代码中，`Find`函数在工作表“Sheet1”的第一列中查找值为“Data”的单元格，如果找到则返回单元格的引用，否则返回“Nothing”。您可以根据需要处理返回的结果。 ### 回答2： 在Excel中使用VBA的find函数来查找数据时，如果找不到要查找的数据，VBA会返回一个特殊的数值，即Nothing。我们可以利用这个特性来判断是否找到了数据。 首先，在VBA中使用find函数来查找数据，可以使用以下代码： ``` Dim rng As Range Set rng = Range("A1:A10") Dim findResult As Range Set findResult = rng.Find(What:="要查找的数据", LookIn:=xlValues, LookAt:=xlWhole) If findResult Is Nothing Then MsgBox "未找到要查找的数据" Else MsgBox "找到了要查找的数据" End If ``` 这段代码首先定义了一个范围对象rng，指定要在哪个范围内查找数据。然后使用find函数在这个范围内查找指定的数据，并将结果赋值给findResult对象。接着，使用if语句判断findResult是否为Nothing，如果为Nothing，则表示未找到要查找的数据，弹出一个消息框提示未找到；如果不为Nothing，则表示找到了要查找的数据，弹出一个消息框提示找到了。 通过以上方法，我们可以在Excel中使用VBA的find函数来返回找不到的数据。 ### 回答3： 在Excel中使用VBA的find函数进行数据查找时，如果找不到对应的数据，通常会返回一个错误消息。为了避免这种错误消息，我们可以通过适当的代码来处理这种情况。 我们可以使用VBA的find函数进行数据查找，并通过设置一个Range类型的变量来接收查找结果。然后，我们可以通过判断这个变量是否为空来确定是否找到了数据。 下面是一个示例代码，用于在Excel中使用VBA的find函数进行数据查找，并处理找不到数据的情况： ```vba Sub FindData() Dim rng As Range Dim result As Range ' 在A1:A10范围中查找值为"ABC"的数据 Set rng = Range("A1:A10") Set result = rng.Find("ABC") ' 判断是否找到了数据 If Not result Is Nothing Then MsgBox "找到了数据！数据所在单元格为：" & result.Address Else MsgBox "未找到数据！" End If End Sub ``` 在上面的示例代码中，我们使用了Range对象的Find方法来查找值为"ABC"的数据。如果找到了对应的数据，将其存储在result变量中；否则，result将为空。然后，我们通过判断result是否为空来确定是否找到了数据，并分别弹出相应的消息框。 通过这样的方式，我们可以在使用VBA的find函数进行数据查找时，处理找不到数据的情况，避免因为查找失败而导致的错误消息。

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值