Need help in amending code

Hi, i need some help in coding. My code is as below

Sub messageMe()

For Each Cell In Sheets("Check").Range("E2:E50000")
        If Cell.Value <> 0 Then
            .......................


End Sub

Can some help help me to amend the code so that
1) its from E2 to last data
2) look for the word "Difference" in Row1 then down to last data

Will appreciate if you can paste both 1) and 2) code so that i have a better understanding.