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..