KeyValue is declared at top, so it's global.
VB breaks at "KeyValue = Trim(strResult)"
Where strResult is the undefined variable.

It have worked before, but when I used WhichFav, it didn't work