One way...With a helper column...
Sub J3v16()
Dim Chk, sNum As String
sNum = Range("B2") & Range("C2") & Range("D2") & Range("E2")
With Sheets("Inputs")
    .Range("H2:H" & .Cells(.Rows.Count, 1).End(xlUp).Row).Formula = "=CONCATENATE(A2,B2,C2,D2,E2,F2)"
    Chk = Application.Match(sNum, .Columns(8), 0)
    If Not IsError(Chk) Then
        Sheets("Check").Range("G2") = .Range("G" & Chk)
    Else
        MsgBox "This selection of numbers has not been entered yet", vbInformation, ""
    End If
    .Columns(8).ClearContents
End With
End Sub