Cómo reemplazar caracteres por lotes en Word

Si desea realizar la automatización de una vez por todas, puede utilizar la programación VBA. La idea de programación es:

Consulte el siguiente contenido, puede crear una nueva macro y pegar el siguiente código en la macro. y quedará satisfecho después de ejecutarlo y lograr su propósito. Se configura una matriz de tres variables y una variable de bucle, que se puede modificar para otros fines.

El código es el siguiente:

=============================== ==

Dim OriginalArr(1 To 4) As String 'La matriz de contenido a encontrar, según la cantidad de contenido a encontrar, simplemente cambie 4 al número correspondiente

Dim ReplaceArr(1 To 4) As String 'Matriz de contenido a reemplazar, según la cantidad de contenido a reemplazar, cambia 4 por el número correspondiente

Dim TempString(1 To 4) As String 'Matriz de variables intermedias, según la cantidad de contenido a reemplazar, cambie 4 al número correspondiente

Dim i As Integer

OriginalArr(1) = "Zhang San" ' Puede configurar el contenido según sea necesario y el resto son

OriginalArr(2) = "李思"

OriginalArr(3) = "王五"

OriginalArr(4) = "He Liu"

ReemplazarArr( 1) = "李思"

ReemplazarArr(2) = "Zhang San"

ReemplazarArr (3) = "He Liu"

ReemplazarArr(4) = "王五"