Risolto, sbagliavo la sitassi della funzione DLookup. Quella corretta è:

v_scorte = DLookup("Scorte", "Prodotti", "DescrizioneProdotto = '" & v_prod & "'")

Questioni di apici e doppi apici, differenti nell'interpretazione delle stringhe da parte di VB ed SQL..