Questa parte
codice:
If Len(newval) Then
è incompleta ... la stai valutando come se fosse un valore boolean.
La funzione Len, invece, restituisce un valore integer.