根据其他两列相等来填充列的宏

发布于 2024-11-27 04:14:50 字数 662 浏览 1 评论 0原文

我是编写宏的新手,我不知道如何编写它。我需要一个宏来比较工作簿 A 的 A 列中的文本与工作簿 B 中的 B 列。如果它们匹配,则它将使用工作簿 A 同一行上的 D 列中的数据,并将其放置在工作簿 B 的 C 列中。如果没有找到匹配项,则会显示“No Match”。我将如何创建这个?示例如下:

            Workbook A                                        Workbook B
     Column A  Column B  Column D                Column A   Column B   Column C
      Smith      --       Name                    ---        Point      No Match        
      Lane       --       Street                  ---        Smith      Name 
      Happy      --       Emotion                 ---        123        Numbers
      123        --       Numbers                 ---        Valid      No Match 

I am new to writing macros and I have no clue on how to write this. I need a macro that compares text in column A of workbook A to column B in Workbook B. If they match, then it would use the data in Column D on that same row of workbook A and place it in Column C of workbook B. If no matches were found, then it would say "No Match". How would I create this? An example is below:

            Workbook A                                        Workbook B
     Column A  Column B  Column D                Column A   Column B   Column C
      Smith      --       Name                    ---        Point      No Match        
      Lane       --       Street                  ---        Smith      Name 
      Happy      --       Emotion                 ---        123        Numbers
      123        --       Numbers                 ---        Valid      No Match 

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(1

寂寞陪衬 2024-12-04 04:14:50

您不需要宏来执行此操作。您所需要的只是一个像这样的 if 条件,

=IF('[WorkbookName1.xlsx]Sheet1'!A1='[WorkbookName2.xlsx]Sheet2'!B1, '[WorkbookName1.xlsx]Sheet1'!D1, "No Match")

只需将该公式向下拖动(或在 vba 中使用“.Formula =”创建它),为 C 列中的所有单元格添加公式。如果您需要帮助将公式添加到来自 VBA 的正确单元格(如果确实有必要)

You won't need macros to do this. All you will need is an if condition something like this

=IF('[WorkbookName1.xlsx]Sheet1'!A1='[WorkbookName2.xlsx]Sheet2'!B1, '[WorkbookName1.xlsx]Sheet1'!D1, "No Match")

Just drag that formula down (or create it in vba with ".Formula = ") for all of the cells in column C. Let me know if you need help with adding the formulas to the correct cells from VBA if that is indeed necessary

~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文