比较两张纸的价值并获得价值 - VBA代码

时间:2014-11-25 10:16:11

标签: excel vba

我有两张Test和BNPP_DC 我比较值E4和B2它是一个文本并从表BNPP_DC

获取一个值

当我运行此代码时,我没有任何错误或错误的响应

提前致谢

Sub run()

Dim bnp  As Worksheet
Dim test As Worksheet

Set bnp = Sheets("BNPP_DC")
Set test = Sheets("Test")

If bnp.Range("E4").Value = test.Range("B2").Value Then

bnp.Range("F4").Copy

test.Activate

Range("B3").Select

test.Paste

End If

End Sub

0 个答案:

没有答案