¿Macro en WORD que enumere correlativamente?

Estoy trabajando en la redacción de una ley en word y debo actualizar el correlativo de todos los artículos, ¿conocen un código que me enumere inciando desde el 1 todos aquellos palabras que sean = Art.?

1

1 respuesta

Respuesta
1

I. Hola Carlos, un compañero aportó la siguiente macro, no sé si funcionará para su caso particular pero quería probar suerte,

Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 29/11/2015 por Tangos
'
For Hoja = 1 To 500
With ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary).PageNumbers
.StartingNumber = Hoja
End With
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
ManualDuplexPrint:=False, Collate:=True, Background:=True, PrintToFile:= _
False, PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
Next
End Sub
[/code:1:800c5574e1]

Aquí podemos ver una serie de enlaces que tratan -creo- esta posibilidad de macro. Ánimo.

https://wordexperto.com/2016/10/25/alineacion-de-la-numeracion/ 

https://fermu.com/articulos/office/32-office/506-como-numerar-secuencialmente-multiples-copias-de-un-mismo-documento-en-word 

https://www.fermu.com/articulos/office/32-office/531-como-numerar-correlativamente-las-copias-impresas-de-un-documento-en-word 

https://www.youtube.com/watch?v=QU8Fou50Vl0 

https://www.youtube.com/watch?v=BCqKJn234vg 

https://computerhoy.com/paso-a-paso/software/crea-lista-numerada-word-1481 

Auto-numerar cuadros de texto en Word

https://www.lawebdelprogramador.com/foros/Word/1550691-PONER-NUMERO-A-CADA-FOLIO-EN-WORD.html 

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas