Ayuda con una macro en Word
Publicado por logan (1 intervención) el 24/02/2003 04:39:21
Saludos a todos. Estoy trabajando con una serie de archivos en el Word y lo que deseo es hacer lo siguiente:
De un archivo de 80 páginas (sin algún formato espectacular) estoy extrayendo los subtemas (algo así como 126), luego los estoy pegando en un nuevo documento sin formato y dándole un formato especial al título, cambiando fondos de color y cambiando colores de fuentes y demás. Todo lo estoy haciendo con una macro. Enseguida lo deseo guardar en una carpeta pero en formato .html, aquí es donde aparece mi problema: deseo guardarlo con un nombre, cualesquiera que sea, pero que siga un orden. Esto con la macro.
¿Cómo le hago para que la macro vaya dándole un nuevo nombre al archivo? Aquí está dado el nombre de 0001. ¿Cómo hacer para que se guarde por ejemplo 0002, 0003? Si se puede me gustaría que alguno de ustedes me de un tip o una línea para lograr mi cometido. Aquí enseguida añado las últimas líneas de la macro que se refieren al guardado. Disculpen si está muy burdo, pues no soy muy bueno en esto de las macros.
--------------------
ActiveDocument.SaveAs FileName:="0001.htm", FileFormat:=wdFormatHTML, _
LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _
:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
False
ActiveWindow.View.Type = wdWebView
End Sub
-----------
De antemano, mil gracias.
De un archivo de 80 páginas (sin algún formato espectacular) estoy extrayendo los subtemas (algo así como 126), luego los estoy pegando en un nuevo documento sin formato y dándole un formato especial al título, cambiando fondos de color y cambiando colores de fuentes y demás. Todo lo estoy haciendo con una macro. Enseguida lo deseo guardar en una carpeta pero en formato .html, aquí es donde aparece mi problema: deseo guardarlo con un nombre, cualesquiera que sea, pero que siga un orden. Esto con la macro.
¿Cómo le hago para que la macro vaya dándole un nuevo nombre al archivo? Aquí está dado el nombre de 0001. ¿Cómo hacer para que se guarde por ejemplo 0002, 0003? Si se puede me gustaría que alguno de ustedes me de un tip o una línea para lograr mi cometido. Aquí enseguida añado las últimas líneas de la macro que se refieren al guardado. Disculpen si está muy burdo, pues no soy muy bueno en esto de las macros.
--------------------
ActiveDocument.SaveAs FileName:="0001.htm", FileFormat:=wdFormatHTML, _
LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _
:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
False
ActiveWindow.View.Type = wdWebView
End Sub
-----------
De antemano, mil gracias.
Valora esta pregunta
0