Hi Charlize

I am getting runtime 5 error on below lines

mynumber = Mid(thebody, InStr(1, thebody, "TOTAL AMT") + 9, _ 
                    InStr(InStr(1, thebody, "TOTAL AMT"), thebody, "VENDOR") - _ 
                    InStr(1, thebody, "TOTAL AMT") - 9) 
                    If mynumber < 101 Then
Also would like to know on below
1) if there are others emails also including these kind of mails then also it will work for these mails only (not on the other mails)
2) can this coding will work if mails on subfolders & have to move to the subfolders subfolder

And I would like to give 5* to you can you let me know how to do this

Thanks
------------------------