Your message indicated that the field contained 'yes', whereas it contains 'Yes'. The function is case sensitive. If you want it not to be then you need to change the line to

If LCase(xlSheet.Range("G" & iRow)) = "yes" Then