请问一个关于集搜索功能的东东

mpy2003 · 发表于 2012-11-23 12:25

本帖最后由 mpy2003 于 2012-11-23 12:25 编辑

longwin 发表于 2012-11-22 13:29
当然可以，我只是做了个粗略的东西，具体使用还是要自己调整一下，你肯定能弄好的。

目前我又增加了一个控件，是想只显示到目前是设置的到A20，怎么样编写可以显示到B2列包含“T/rod 拉杆”的行，比如现在“T/rod 拉杆”在A22行，则只显示到A22行，假如“T/rod 拉杆”在A25行，则只显示到A25行请问一个关于集搜索功能的东东.png

Work.zip (213.94 KB, 下载次数: 13)

longwin · 发表于 2012-11-23 23:59

mpy2003 发表于 2012-11-23 12:25
目前我又增加了一个控件，是想只显示到目前是设置的到A20，怎么样编写可以显示到B2列包含“T/rod 拉杆”的 ...

w2.Range("A4:Z" & [A20].End(3).Row).Copy '目前是设置的到A20，怎么样编写可以显示到B2列包含“T/rod 拉杆”这一行，比如现在“T/rod 拉杆”在A22行，则只显示到A22行

这样改：
通过程序计算出你想要到的行数后：
w2.Range("A4:Z" & 你想要到的行数).Copy
比如说到25行：
w2.Range("A4:Z25“).Copy

mpy2003 · 发表于 2012-11-24 00:30

longwin 发表于 2012-11-23 23:59
w2.Range("A4:Z" & [A20].End(3).Row).Copy '目前是设置的到A20，怎么样编写可以显示到B2列包含“T/rod 拉 ...

就是我在表格中的V3单元格用公式得到了那一行的行数，比如V3单元格的值是25，
我是应该怎么样用w2.Range("A4:Z25“).Copy写进去？是w2.Range("A4:Z“&[v3]).Copy吗？

还有问题是如果不使用模块的方式与使用模块的方式有什么区别？我要是插入的是命令按钮应该要怎么改你的程序？今天我摸索了一天没弄懂。

longwin · 发表于 2012-11-24 01:07

mpy2003 发表于 2012-11-24 00:30
就是我在表格中的V3单元格用公式得到了那一行的行数，比如V3单元格的值是25，
我是应该怎么样用w2.Range ...

用模块与不使用模块在这里基本没什么区别，只是程序放的地方不一样而已

mpy2003 · 发表于 2012-11-24 07:55

本帖最后由 mpy2003 于 2012-11-24 07:55 编辑

longwin 发表于 2012-11-24 01:07
用模块与不使用模块在这里基本没什么区别，只是程序放的地方不一样而已

虽然不懂他们的区别是在哪，那我上面的引用对不对呢？
比如v3的内容25，
应该怎么样用w2.Range("A4:Z25“).Copy写进去？是不是w2.Range("A4:Z“&[v3]).Copy
或者V3的内容是Z25
那公式是不是变成w2.Range("A4:[v3]”).Copy
请指教，谢谢

longwin · 发表于 2012-11-24 11:27

mpy2003 发表于 2012-11-24 07:55
虽然不懂他们的区别是在哪，那我上面的引用对不对呢？
比如v3的内容25，
应该怎么样用w2.Range("A4:Z25 ...

v3的内容25：w2.Range("A4:Z“&[v3]).Copy
V3的内容是Z25 ：w2.Range("A4:" & [v3]).Copy

mpy2003 · 发表于 2012-12-1 12:47

本帖最后由 mpy2003 于 2012-12-1 13:00 编辑

longwin 发表于 2012-11-24 11:27
v3的内容25：w2.Range("A4:Z“&[v3]).Copy
V3的内容是Z25 ：w2.Range("A4:" & [v3]).Copy

w2.Range("A4:Z" & [V3].End(3).Row).Copy
假如V3＝22，这样好像有问题跟原本的目的不一样了

弄明白了，.End(3).Row这一部分去除就可以，谢谢

longwin · 发表于 2012-12-1 13:00

假如V3＝22:
w2.Range("A4:Z“&[v3]).Copy
这样就选定了A4:Z22

		自动登录	找回密码
密码			免费注册

[已解决] 请问一个关于集搜索功能的东东

评分