Macros guardar como html
luis_ffernando
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!!!
H�ctor Miguel
> 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?
aqui encuentras las mejores alternativas para guardar archivos de excel en formatos html:
Excel to HTML conversions
http://www.mvps.org/dmcritchie/excel/xl2html.htm
> 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.
esta parte no es muy clara, al cerrar excel se cierran los archivos abiertos (no ?)
saludos,
hector.
Fernando@discussions.microsoft.com Luis Fernando
Gracias por su empeño en ayudarme.
Esta es la primera vez que hago algo así... y la verdad es que me asusté
cuando he visto el codigo html en la pagina que me has pasado.
Lo que necesito yo, es algo mas sencillo... y no hace falta que las macros
se ejecuten en html ( si bien que eso estaria mucho mejor ). apenas necesito
que me guarde en otro formato que no sea xls...
si se puede ser en html mejor, pero si es mas sencillo en doc, por ejemplo,
no habria ningun problema.
Gracias una vez mas!!!
Saludos
Fernando
"Héctor Miguel" wrote:
> .
>
Yago
Creo que bastaria con poner
ActiveWorkbook.SaveAs Filename:="E:\prueba\" & Format(Range
("F10").Value,
"dd.mm.yyyy - ") & Range("F11").Value & ".htm", FileFormat:=xlHtml,
ReadOnlyRecommended:=False, CreateBackup:=False
A mi entender lo cerrar, sera despues de guardar el documento como
Html? no entiendo otro sentido.... si es eso lo que quieres, que se
cierre el documento justo despues de guardarlo como html, solo tienes
que poner despues del codigo anterior:
ActiveWindow.Close
Espero que te sirva.
Un saludo.
Iago
Pd:
Yo no tengo mucha idea, pero este codigo lo genera directamente excel,
cuando tu le das a crear nueva macro, y realizar las acciones que
quieras...por ejemplo guardar como html...
On 23 dic, 21:01, Luis Fernando <Luis
Luis Fernando
Gracias por tu ayuda... la macro funciona perfectamente.
Solo me gustaria saber si es posible guardar en el formato html de una sola
pagina, para que no sea creada una carpeta.
Gracias una vez mas!
Luis Fernando
"Yago" wrote:
> .
>
Iago
Entiendo lo que pides pero no se si lo guarda exactamente como tu lo
quieres...
Haz tu mismo la prueba, si sabes como guardarlo, dale a Vista, Grabar
macro, Realizas la operacion que quieres, Guardar como, Pagina web
etc... y veras como se escribe el codigo para guardarlo como tu
quieres...
Por ejemplo, Guardar como, Pagina web de un solo archivo
y te pondra este codigo:
With ActiveWorkbook.PublishObjects("Libro1_752")
.Filename = "C:\Users\Tiendasck\Documents\Nueva carpeta
\Libro1.mht"
.Publish (False)
.AutoRepublish = False
End With
Espero q te sirva...
salud!
Iago
On 27 dic, 01:03, Luis Fernando
Luis Fernando
Gracias por tu ayuda, pero esa macro no funciona...:o(
siguiré buscando como hacer eso de otra forma. Tu no sabrias como hacer eso
para guardar en doc, o sí?
Un Saludo y Feliç any nou!!!
"Iago" wrote:
> .
>