Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 1498|回复: 12

vba 百分比查询返回行号和列号

[复制链接]
发表于 2021-10-17 19:26 | 显示全部楼层 |阅读模式
微信截图_20211017192145.png

查询字符串没有没有问题   想查询最后一个的 13%  行号和列

Sub 查找()
For Each rng In Range("a1:a999")
    If rng = "13%" Then
        a = rng.Row
        b = rng.Column
    End If
Next
MsgBox "行号为" & a & "-" & "列号为" & b
End Sub

excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2021-10-17 19:44 | 显示全部楼层
Sub demo()
   Set Rng = [a:a].Find("13%", , , , , xlPrevious)
   Debug.Print Rng.Row
   Debug.Print Rng.Column
End Sub

点评

函数题搞了。本来想VBA搞的。没思路。只好用函数了。  发表于 2021-10-17 20:10
回复

使用道具 举报

发表于 2021-10-17 19:55 | 显示全部楼层
cutecpu 发表于 2021-10-17 19:44
Sub demo()
   Set Rng = [a:a].Find("13%", , , , , xlPrevious)
   Debug.Print Rng.Row

今天一天没上。题都被你抢完了。就留 了个函数题 给我。

点评

哈哈,最难的留给您  发表于 2021-10-17 20:06
回复

使用道具 举报

 楼主| 发表于 2021-10-17 20:08 | 显示全部楼层
心正意诚身修 发表于 2021-10-17 19:55
今天一天没上。题都被你抢完了。就留 了个函数题 给我。

哈哈  别急嘛  哈哈 一般好事都在后面哈哈
回复

使用道具 举报

发表于 2021-10-17 20:09 | 显示全部楼层
lj3543711 发表于 2021-10-17 20:08
哈哈  别急嘛  哈哈 一般好事都在后面哈哈

哈哈
回复

使用道具 举报

 楼主| 发表于 2021-10-17 20:21 | 显示全部楼层

运行时错误’91’:
对象变量或with块变量未设置
上面超级版主  提供报错, 您看看好给您加鸡腿哈哈🍗

点评

大侠,要不要上个附件,好查看出错原因喔!  发表于 2021-10-17 20:24
回复

使用道具 举报

 楼主| 发表于 2021-10-17 20:25 | 显示全部楼层
lj3543711 发表于 2021-10-17 20:21
运行时错误’91’:
对象变量或with块变量未设置
上面超级版主  提供报错, 您看看好给您加鸡腿哈哈&#12 ...

这都被你发现啦 阿弥陀佛!
回复

使用道具 举报

 楼主| 发表于 2021-10-17 20:28 | 显示全部楼层
附件来了

工作簿1.zip

213.45 KB, 下载次数: 4

回复

使用道具 举报

 楼主| 发表于 2021-10-17 20:28 | 显示全部楼层
cutecpu 发表于 2021-10-17 19:44
Sub demo()
   Set Rng = [a:a].Find("13%", , , , , xlPrevious)
   Debug.Print Rng.Row

8楼附件 哈哈

点评

大侠,您的「税率」在 P 列,代码是不是应该要改成[P4:P1003]  发表于 2021-10-17 20:36
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-3-29 18:38 , Processed in 0.597194 second(s), 11 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表