tonigim

Al grabar una macro para controlar el formato de un párrafo, todo va bien hasta que doy la orden: Formato/Guiones/Automático. El problema es que no se graba nada. Se graba: párrafo justificado, tipo de letra, tamaño, negrita, etc. Pero no da opción...

Le podría servir la siguiente macro siempre y cuando haya UNA SOLA TABLA y la columna 1 esté vacía: Public Sub aTabla() ' Rellena la columna 1 de una tabla con la numeración correspondiente ' Se supone que SOLO hay una tabla y que la columna 1 está...

Pruebe con esta macro Sub ExportPagPdf2prueba3() Dim pag As Integer, x As Long, carpeta As String, z As String Selection.HomeKey Unit:=wdStory pag = ActiveDocument.BuiltInDocumentProperties(wdPropertyPages) x = 3952 z = " lo que sea" carpeta =...

Pruebe esta Macro Public Sub Lisandro() Dim rng As Range, x As Integer, i As Integer X = ActiveDocument.Paragraphs.Count - 1 Debug.Print X Tex = "<[A-Z][A-Z]*[A-Z]>" For i = X To 1 Step -1 Set rng = ActiveDocument.Paragraphs(i).Range If...

Pruebe la siguiente Macro (Office 2007). Sub PRUEBASORT444() ‘Declaración de variables Dim rng As Range Dim matWords() As String Dim cadena As String, cadRep As String, mm As String Dim i As Integer, j As Integer, k As Integer, y As Integer, z As...

Pensaba que habría algún procedimento para conseguir algo tan elemental como una listado con todas las variables y propiedades utilizadas en una macro determinada. Debe de haber tal procedimiento porque en la ventana local sale tal listado, pero no...

Si Set rng = ActiveDocument.Paragraphs(1).Range Al hacer una búsqueda; If rng.Find.Execute(findText:="Hola") Then Si encuentra el texto se verifica que rng=Hola, es decir, cambia el RANGO, por lo que no podemos hacer una nueva búsqueda. Si hay que...

Tengo diversos textos con el formato que muestro más abajo y estoy intentando diseñar una macro que los guarde automáticamente con el siguiente nombre de archivo: AUTOR Título Fecha artículo.doc Para el ejemplo que acompaño a la pregunta sería:...

La siguiente macro puede servir. No tiene ningún mérito pues está hecha con la grabadora de macros. Sub Imprimir() ' ' Selection.HomeKey Unit:=wdStory ' Imprimo todo el texto ActivePrinter = "Microsoft XPS Document Writer" Application.PrintOut...

Se trata de localizar párrafos de una sola línea para borrarlos; en el siguiente ejemplo, el primer párrafo es válido pero los tres siguientes sobran Realizadas las elecciones municipales, ahora nos toca ver cómo se desarrollan los pactos necesarios...