Cómo guardar un documento de X páginas de Word en paginas independientes en formato html
Autor monica
09.12.2007
Aunque
Word no es un programaespecializado en
diseño web,los documentos que generemos
en formato html. En este sentido puede sernos útil guardar un documento de X
páginas en archivos independientes html para subirlo a nuestra web. En este
articulo os presentamos una macro que realiza la tarea
La
Macro coge la totalidad de las páginas que tengael documento y te la separara como archivos
independientes en formato html. Los documentos html generados serán guardados en la carpeta Mis documentos. La Macro es funcional en Word 2003 / Word 2007.
Sub guardar_paginas_html()
Dim y As Long
Dim i As Long
Dim name As String
Selection.HomeKey Unit:=wdStory
y = ActiveDocument.BuiltInDocumentProperties _
(wdPropertyPages)
i = 0
While i < y
i = i + 1
name = "documento" & Format(i)
ActiveDocument.Bookmarks("\Page").Range.Cut
With Documents.Add
.Range.Paste
.SaveAs FileName:=name, _
FileFormat:=wdFormatHTML
.Close
End With
Wend
End Sub
Filtro
No comments...
Escribir un comentario
Por favor, mantenga el asunto de los mensajes relevantes al tema del artículo.
Los ataques verbales personales serán eliminados.
Por favor, no emplee comentarios para promocionar su sitio web. Este tipo de mensajes serán eliminados
