Macros guardar como html

Hola tod@s!

Tengo la siguiente macro:

Private Sub CommandButton1_Click()

ActiveWorkbook.SaveAs "E:\prueba\" & Format(Range("F10").Value,
"dd.mm.yyyy - ") & Range("F11").Value & ".xls"

End Sub


Que me funciona de maravilla. Lo que pasa es que cuando yo cambio la
extension de xls a html, me crea un archivo que no se abre.

Alguien sabe como yo podria crear una macro para guardar la hoja que
estoy trabajando como pagina web de un solo archivo?

Ahh.. Eso es menos importante, pero tambien me gustaria saber si hay
una manera de que ese formulario se cierre apenas cuando se cierre el
excel.

Ahora sí... eso es todo,
Gracias!!!