copy not existing cells from one sheet to another

[rana_shaker]

hi ..
I have "stoke" sheet with a code names in column B ..

and I have another sheet "sat" .. whith code names in column B starting from B2

I want a code to check if all codes in "sat" sheet exists in "stoke" sheet and if that code not exists I want to add it to the bottom of "stoke" sheet

I found this code in the forum from AB33 .. but when I tried it and checked the result ,, I found that some codes not copied ..
I don't know why ??

Dim c3 As Range
Dim c4 As Range
Dim LR2 As String

With Sheets("sat")
LR2 = .Cells.Find(what:="*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
For Each c4 In .Range("B2:B" & LR2)
Set c3 = Sheets("Stoke").Columns(2).Find(c4, , xlValues, xlWhole)
If c3 Is Nothing Then
c4.EntireRow.Copy Sheets("Stoke").Cells(Rows.Count, 1).End(xlUp).Offset(1)
End If
Next
End With

hope that I can find the answer

[AB33]

Rana,
No, you have found the code, but I wrote it for you when you had requested for it. It was then worked.

[rana_shaker]

I asked u for the code using Al sheet but I changed the sheet only .. instead of Al I used sat ...
it is working well with Al sheet but with sat some of not existing cells not copied to stoke sheet

[rana_shaker]

yes ... thanks to you really ..
it is working ,,, but when I check it manually I fount that it did not take all the not existing cells .. thats it
can you please help me ??

[AB33]

Please attach your workbook

[rana_shaker]

the file is 2 MB .. larg

[rana_shaker]

here is a sample file ..
test2.zip