1
Launch " Word ", haga clic en la pestaña " desarrolladores" y haga clic en "Visual Basic " para abrir el Editor de Visual Basic . Haga clic en el menú "Insertar " y haga clic
2
Inicio , escriba el siguiente código de VBA para crear un nuevo procedimiento sub " Módulo ". :
Private Sub centerText ()
3
Declare dos variables que va a utilizar para mantener el principio y el texto final que desea centrar :
FirstWord dévil como secuencia
LastWord Dim As String
4
Definir las palabras iniciales y las palabras que terminan en su párrafo como el siguiente :
FirstWord = " comienzo del apartado "
LastWord = "fin de la el apartado "
5
Copia y pega el siguiente código para buscar el documento de Word utilizando las variables que ha definido y para centrar el texto entre ellos :
ActiveDocument.Content.Duplicate < . br>
Find.Execute FindText : = FirstWord & " * " & LastWord , MatchWildcards : . = True
MoveStart wdCharacter , Len ( FirstWord )
MoveEnd wdCharacter , Len - . . ( LastWord )
ParagraphFormat.Alignment = wdAlignParagraphCenter
End con fotos de 6
Fin del procedimiento sub escribiendo lo siguiente :
End Sub