如果第三个单元数据变量与第一个工作表变量匹配,则Excel将两个数据单元从一个工作表复制到另一个工作表

时间:2013-07-25 19:22:31

标签: excel vba excel-vba if-statement copy-paste

我在一家保险公司工作。我们在Sheet1中有一个“Policy Number”列(Sheet1,B列),其中包含所有不同的策略编号,但需要关联的列“Policy Effective Date”(Sheet1,Column I)和“Policy Expiration Date”列(Sheet1,J列) )如果政策编号(Sheet2,B列)等于政策编号(Sheet1,B列),则从Sheet2“仅”复制日期,然后将相关的政策生效日期从Sheet2,I列复制/粘贴到Sheet1,I列和相关政策到期日期从Sheet2,J列复制/粘贴到Sheet1,J列。

实施例:

Sheet 1中

B栏第I栏J栏 政策编号政策生效日期政策到期日期
123456789个

Sheet 2中
B栏第I栏J栏 政策编号政策生效日期政策到期日期
123456789 12/1/2012 12/1/2013

1 个答案:

答案 0 :(得分:0)

这应该适合你:

  

= VLOOKUP($ B5,Sheet2!$ B:$ J,COLUMN() - 1,FALSE)

编辑

暂时“快速而肮脏”(更复杂的公式会为你做更多的工作,但我不确定这是值得的 - 除非你这样说)。

  1. 在Sheet1中插入'新'ColumnB,在B3中输入= A3 * 1并复制下来。
  2. 在Sheet2中复制ColumnC并插入“新”ColumnA。
  3. 在Sheet1中!C3放置=VLOOKUP($B3,Sheet2!$A:$C,2,FALSE)并复制到D3
  4. D3中将,2,更改为,3,
  5. 选择C3:D3并双击底部右上角。
  6. C28D28$B更改为$A
  7. 选择C28:D28,然后双击底部右下角。
  8. 假设其他地方没有公式,那么最好选择每张纸并在顶部粘贴特殊值,然后去除任何盈余。

    请注意,所有这些都是基于要求“一次性”而不是正在进行的/常规的。