Cómo repetir una macro hasta el final del documento - MacOS High Sierra v 10.13.6 - Microsoft Word para Mac v 16.15

Question

Sé muy poco sobre V Basic, pero sé que lo que quiero hacer debe ser simple. Solo quiero bajar una línea, hacia la izquierda y retroceder para que no haya saltos de línea. Estoy intentando formatear para poder ponerlo en xCode. He mirado las preguntas de otras personas tratando de hacer cosas similares (repetir una macro) pero siempre hay alguna variable que hace que no funcione... como si estuviera tratando de encontrar algo en el texto. Sólo quiero bajar, bksp, bajar bksp hasta el final.

Así es como se ve mi texto: " pregunta ", "¿ ¿Quién es el autor de Ghost? ", "¿ ¿Por qué tiene Andrew Dahl el récord mundial? ", "

y esto es lo que tengo hasta ahora en la Macro grabada:

' Reformatear el texto de preguntas y respuestas para xcode ' Unidad Selection.MoveDown:=wdLine, Count:=1 Selection.HomeKey Unidad:=wdLine Selection.TypeBackspace Selection.MoveDown Unidad:=wdLine, Count:=1 Selection.HomeKey Unidad:=wdLine Selección.TipoRetroceso

¡Por favor ayuda! ¡¡Agradecer!!

Answer 1

Prueba esto:

Sub ElimParas()
With ActiveDocument.Range.Find
    .ClearFormatting
    .Replacement.ClearFormatting
    .Format = False
    .Forward = True
    .Wrap = wdFindContinue
    .Execute FindText:="^p", ReplaceWith:=" ", Replace:=wdReplaceAll
End With
End Sub