il dubbio viene perché una riga

If Not RSScheda.EOF Then

esiste già. quindi il problema è da qualche altra parte, e non nella porzione di codice che hai postato