Excel Vba If String Doesnt Fall Far From The Tree