匹配并复制
您好，我在创建宏时遇到一些困难 - 我需要一个宏，当用户输入部门代码时，宏将获取该数字，转到第一个工作表，读取 B 列，直到它与部门代码匹配，然后复制所有适当的部门代码的行。然后我需要它循环直到最后一个工作表。该工作簿大约有 9 个工作表。
Hi I am having some difficulty creating a macro - i need a macro whereby when the user input a dept code, the macro will take the number, go to first worksheet, read column B until it match the dept code, then copy all the appropriate rows for the dept code. I then need this to loop until the last worksheet. The workbook has about 9 worksheets.
如果你对这篇内容有疑问，欢迎到本站社区发帖提问 参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱，如果其他用户或者作者回复了您的评论，将不能在第一时间通知您！
发布评论
评论（2）
真的需要VBA吗？
您实际上可以使用 VLOOKUP 函数来完成此操作。
您可以传递搜索条件
'c'、表'T'和列索引'i'。它将返回
'T'中'i'列的内容，其中第 1 列与您的条件'c'匹配。或者我误解了你的问题？
问候
does it really need to be VBA?
you could actually do this with the VLOOKUP-function.
you may pass your search criteria
'c', a table'T'and a column index'i'.it will return you the content of the column
'i'in'T'where column 1 matches your criteria'c'.or am i misunderstanding your question?
regards
尝试过 - 基本上，一旦部门代码匹配，我不会返回一个值，而是一个数组范围。例如，在A1（工作表1）中输入值，然后使用该输入来匹配工作表2中A列（A1：A99）的所有值。如果存在匹配项，则以数组格式复制与输入值关联的标题行和所有其他行 (A:ZZ)。
tried that - basically, once the dept codes are matched, i am not returning a value, but an array range. For example, value in input in A1 (Sheet 1), then use the input to match all the values column A (A1:A99)in Sheet2. If there's a match, copy the heading rows and all other rows (A:ZZ)associated to the input value in an array format.