solo necesitas agregar la linea al principio del documento
Cita: Response.ContentType = "application/vnd.ms-excel"
y cuando termines de generar el documento, este se abrira en Excel

Anexo
si deseas que el archivo tenga un nombre predeterminado
Cita: archivo="nombredeseado" & ".xls"
Response.Charset = "UTF-8"
Response.ContentType = "application/vnd.ms-excel"
Response.AddHeader "Content-Disposition", "attachment; filename=" & archivo %>