Quizas no definiste la tabla Feriado como dice el ejemplo en el punto 2, manualmente en la hoja Excel.
Pero sino intenta directamente :
rsVac.Open "Select * From A1:G6 order by Oficina, Nombre", ConexionBD,3,3
y llena las 1ras. 6 columnas con algun valor.
ver completo en
http://www.aspfacil.com/articulos/190301.asp