Macros guardar como html

hola luis fernando !

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.

Hola Hector,
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:

hola luis fernando !

> 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.


.

Buenas Fernando,

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
wrote:

Hola Hector,
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:
> hola luis fernando !

> > 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.

> .

Muy buenas Yago!

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:

Buenas Fernando,

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
wrote:
> Hola Hector,
> 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:
> > hola luis fernando !
>
> > > 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.
>
> > .

.

Buenas Luis,

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
wrote:

Muy buenas Yago!

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:
> Buenas Fernando,

> 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
> wrote:
> > Hola Hector,
> > 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:
> > > hola luis fernando !

> > > > 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.

> > > .

> .