Hi shg,
There will be any diffrence if I use
 If wks.Range("A1").Value Like "apple" Then wks.Delete
instead of
 If LCase(wks.Range("A1").Value) = "apple" Then wks.Delete
???