第一文档网 > 所有分类 > 下载此文档
最新更新热点专题网站地图搜索文档

简单的VBA查询代码文档

2022-07-14 15:15:14   第一文档网     [ 字体：小 中 大 ] [ 阅读： ] [ 文档下载 ]
说明：文章内容仅供预览，部分内容可能不全。下载后的文档，内容与下面显示的完全一致。下载之前请确认下面内容是否您想要的，是否完整无缺。下载word有问题请添加QQ：admin处理，感谢您的支持与谅解。点击这里给我发消息

【#第一文档网# 导语】以下是®第一文档网的小编为您整理的《简单的VBA查询代码文档》，欢迎阅读！
代码,简单,文档,查询,VBA

高分求简单VBA查询代码





我表格sheet1中是这种数据，我想查询A列中包含homozygote单词的所有行，并且在sheet2中返回包含这个单词的这一整行数据。 最后结果sheet2中是以下数据：



提问者采纳

可以在sheet1底部标签名上点鼠标右键，选查看代码，弹出VBA窗口，把下面代码复制进去执行即可。 Sub 查询() t = "homozygote" t1 = Len(t) s = 1

x = Range("a65536").End(xlUp).Row For i = 1 To x

If Left(Cells(i, 1), t1) = t Then

Sheets("sheet2").Range("a" & s & ":z" & s).Value = Range("a" & i & ":z" & i).Value s = s + 1 End If Next

Sheets("sheet2").Select End Sub




本文来源：https://www.dywdw.cn/360dab7ab0717fd5370cdcca.html

相关推荐
推荐阅读
最新更新文章
热门阅读文章
网友正在阅读