ok, tutto quel codice lo incapsuli in una IF fatta così

codice:
Giorno=....ricavi il giorno della settimana, magari già dalla tendina
IF  navrec(Giorno)=True Then
' qui metti il codice che mostra la riga
ELSE
' salta la riga
END IF