We guess you want to compare  line numbers.
if a line number does not appear in sheet2, color  it red.
Try this

Sub m()
Dim mws As Worksheet
Dim cws As Worksheet

Dim mrng As Range
Dim crng As Range
Dim c As Range

Dim awf As WorksheetFunction
Set awf = Application.WorksheetFunction

Sheets(1).Select
Set mws = Sheets(1)
Set mrng = Range(Cells(2, 2), Cells(2, 2).End(xlDown))

Sheets(2).Select
Set cws = Sheets(2)
Set crng = Range(Cells(2, 2), Cells(2, 2).End(xlDown))

For Each c In mrng
If awf.CountIf(crng, c) <> 1 Then mws.Cells(c.Row, 1).Resize
(1, 6).Interior.Color = vbRed
Next c

Sheets(1).Select
End Sub

We clarified our own misunderstanding and rewrite a few line thus

> Set mws = Sheets(1)
> Set mrng = Range(mws.Cells(2, 2), mws.Cells(2, 2).End(xlDown))
> Set cws = Sheets(2)
> Set crng = Range(cws.Cells(2, 2), cws.Cells(2, 2).End(xlDown))

The comparison need to depend on column A,B,C,D and F. This is because the same
id of stock might have different linenumber, Shipnumber, Release or person
incharge.

So I need to combine all these columns as the condition to compare.

A coder never fails to miss the unique requirements of the project
owner.

We have shown you how to check column B (2).
You are free to modify the code to include other columns A(1), C
(3)... or build a loop to do that.
Alternatively, if that is your intention, join columns A, B, C...
with =A1 & B1 & C1... in a helper column before comparing.