如何从值等于特定数字的列中获取Excel中的值?

时间:2016-07-15 19:49:35

标签: excel excel-vba vba

我首先有2张 - 所有数据。在第二个我想只显示我想要的值。类似:第一张纸的“B”的IF值= 1,在第二张纸上显示C列和D列的值。

Here i need to select all values that equals, for example "503" in the column L, and show them all in the 2nd sheet.

我该怎么做?

1 个答案:

答案 0 :(得分:0)

或者这是一个比较两个单元格的小代码片段,相同的不同(由您决定)如果匹配,则将它们放在工作表2的列L1中:

Sub TEST()
Dim value1 As String
Dim value2 As String
value1 = ThisWorkbook.Sheets(1).Range("A1").Value 'sheet 1 value
value2 = ThisWorkbook.Sheets(2).Range("b1").Value 'sheet 2 value
If value1 = value2 Then
ThisWorkbook.Sheets(2).Range("L1").Value = value1 'or 2
Else
MsgBox ("Values do not match!" + vbNewLine + vbNewLine + "'" + value1 + "'" + "does not match '" + value2 + "'.")
End If
End Sub

enter image description here

如果您想根据自己的喜好进行调整,请更改工作表1的值,或更改工作表2,即电话。

快乐编码:)