表2单元格值修改表1单元格值

yanwei82123300

请老师看看表1（表名LAN）,我想在表2（表名:编辑PLAN）中对表一进行相关单元格值的修改：
例如：
   表1 D2单元格：MO-1817405 E2单元格值:5/14/2019
  我想在表2中进行修改：增加一个命令按钮，（条件是：表1 D2单元格值与表2 A2单元格） 将表1 E2单元格值修改为 表2中B2单元格值:6/10/2019

roych

加一列用vlookup就好了，为啥去想VBA呢？

yanwei82123300

roych老师表1是主表，一般不进行频繁的修改有时候在编辑过滤的时候会使用，在不改变现状的情况下通过表2修改表1中其他的数据。也就是说，我正在使用表1，突然有人要求改表1中的某一条数据值，我想使用表2进行修改更新表1的数据。

yanwei82123300

roych记得您好像写了一个excel 例子是通过sheet2（里面相关单元格为条件）查询sheet1的数据，我一直在用非常好用，在不影响sheet1的情况下，在sheet2里面查询数据

yanwei82123300

老师这有个相关例子，但是我代码有些看不懂，请看一下能否修改为新手能够看懂的代码？谢谢
Sub ss()
Dim brr, x%, t
t = Sheet1.Range("e1")
brr = Sheet2.UsedRange
    For x = 2 To UBound(brr)
        If brr(x, 1) = t Then
            With Sheet1
                brr(x, 1) = .[e1]
                brr(x, 2) = .[b1]
                brr(x, 3) = .[b2]
                brr(x, 4) = .[e2]
            End With
         End If
    Next
        Sheet2.Range("a1").Resize(UBound(brr), UBound(brr, 2)) = brr
End Sub

方漠

很久不见了，Yanwei兄近况如何？　

yanwei82123300

方漠 发表于 2019-6-6 12:32
很久不见了，Yanwei兄近况如何？　

老师好久不见，谢谢帮助 ，