在C列查找某个固定值的连续区域复制偏左一列内容到另一个工作簿

evbafans · 发表于 2018-10-18 16:31

要求：

在Book11sheet1下，查找C列某个值，选定相同值的连续区域并向左偏移一列，对应复制该区域内容，选择性粘贴到BOOK2中SHEET1A列最下方非空单元格中(见表)

例如：在C列查找K SPINEL，选定相同（红色字体部分）的整个区域并向左偏移一列复制对应区域内容（黄色区域），选择性粘贴到BOOK2中sheet1A 列最下方非空单元格中

evbafans · 发表于 2018-10-18 18:28

请各位老师帮帮俺吧

不知道为什么 · 发表于 2018-10-18 18:34

evbafans 发表于 2018-10-18 18:28
请各位老师帮帮俺吧

到底要查找哪个值呢？如果不指定就全部复制过去不ok了？

evbafans · 发表于 2018-10-18 18:37

不知道为什么发表于 2018-10-18 18:34
到底要查找哪个值呢？如果不指定就全部复制过去不ok了？

查找C列中指定的值，把相同的值形成的区域对应的B列的区域复制粘贴，请帮忙！

不知道为什么 · 发表于 2018-10-18 18:59

evbafans 发表于 2018-10-18 18:37
查找C列中指定的值，把相同的值形成的区域对应的B列的区域复制粘贴，请帮忙！

我的意思，到底指定了哪个值？

evbafans · 发表于 2018-10-18 19:30

不知道为什么发表于 2018-10-18 18:59
我的意思，到底指定了哪个值？

请您看一下附件，比如我想用InputBox查找船名为“K SPINEL
”，把所有相同的K SPINEL的单元格连续区域所对应的左列报检号复制并粘贴到另一个工作簿。

evbafans · 发表于 2018-10-18 19:39

我是想通过InPutBox输入指定的船名，查找相同船名的连续区域（附件中红色字体部分），然后用offset偏移左列，复制与船名对应的报检号的整个区域（附件中黄色部分），复制粘贴到另一个工作簿

不知道为什么 · 发表于 2018-10-18 19:47

evbafans 发表于 2018-10-18 19:39
我是想通过InPutBox输入指定的船名，查找相同船名的连续区域（附件中红色字体部分），然后用offset偏移左列 ...

这个就是个简单的查询，数组就可以把。

evbafans · 发表于 2018-10-18 19:53

能不能提供一下代码，我前段时间刚看VBA的书还处在初始阶段，简单的代码勉强看得懂，自己还真不会写，请老师们帮忙。

evbafans · 发表于 2018-10-19 08:00

有哪位老师能帮帮我？

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

[求助] 在C列查找某个固定值的连续区域复制偏左一列内容到另一个工作簿