Saltar al contenido principal

¿Cómo cambiar comillas rectas a comillas rizadas en Word?

Normalmente, Microsoft Word cambiará automáticamente las comillas rectas. a citas rizadas (ortografistas inteligentes) a medida que escribe. Pero si la función está desactivada, tanto las comillas simples como las dobles pueden aparecer directamente en su documento. A continuación, se ofrecen algunos consejos para cambiar las comillas rectas por comillas curvas y viceversa en Word.

Cambie de citas rectas a citas rizadas con Buscar y reemplazar

Cambie las comillas rectas a comillas rizadas con VBA


flecha azul burbuja derecha Cambie las comillas rectas por comillas rizadas con Buscar y reemplazar

Pestaña Office: trae interfaces con pestañas a Word, Excel, PowerPoint...
ot palabra media anuncio 100
Mejore su flujo de trabajo ahora.      Más información       Descargar gratis

Antes de aplicar Buscar y reemplazar, deberías ir a Opciones de autocorrección para desmarcar la "Comillas rectas" con "comillas tipográficas" Casilla de verificación.

En Word 2003, Opciones de autocorrección está bajo el bar. Y en Word 2007, aplicando Opciones de autocorrección haciendo click  > Opciones > impermeabilización > Opciones de autocorrección. Aquí tomamos Word 2010/2013 por ejemplo:

Paso 1. Hacer clic  > Optión > impermeabilización > Opciones de autocorrección > Autoformato mientras escribeY seleccione "Comillas rectas" con "comillas tipográficas" casilla de verificación. Ver captura de pantalla:

Paso 2. Hacer clic Inicio > Reemplaza existentes Edición grupo o prensa Ctrl + H para mostrar Buscar y reemplazar cuadro de diálogo y escriba "or '' in Encuentra lo que cuadro y escriba " or ''in Reemplazar con caja. Ver captura de pantalla:

Paso 3. Hacer clic reemplazar todo.

Nota: Si desea reemplazar todas las comillas rizadas con comillas rectas, borre "Comillas rectas" con "comillas tipográficas" casilla de verificación).


flecha azul burbuja derecha Cambie las comillas rectas a comillas rizadas con VBA

Para reemplazar todas las comillas rectas con comillas curvas en Word 2010 con el uso de VBA, haga clic en Archive> Optión > impermeabilización y haga clic Autocorrección Opciones y seleccione el "Comillas rectas" con "comillas tipográficas" Marque la casilla de la siguiente manera primero. (Note: si desea reemplazar todas las comillas curvas con comillas rectas, desactive la casilla de verificación "Comillas rectas" con "comillas tipográficas").

Paso 1: presione "Alt-F11”Para abrir la ventana de Microsoft Visual Basic para aplicaciones;

Paso 2: Click Módulo en recuadro pestaña, copie y pegue el siguiente código VBA en el Módulo ventana;

Paso 3: luego haga clic en Ejecutar botón para aplicar el VBA.

El siguiente VBA es cambiar comillas rectas a comillas entrecruzadas:

Sub ChangeDoubleStraightQuotes()
'Update 20131107
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = """"
.Replacement.Text = """"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord =False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

 

El siguiente VBA es cambiar las comillas rizadas por comillas rectas:

Sub ReplaceSmartQuotes()
Dim vFindText As Variant
Dim vReplText As Variant
Dim i As Long
vFindText = Array("[^0145^0146]", "[^0147^0148]")
vReplText = Array("^039", "^034")
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Forward = True
.Wrap = wdFindContinue
.MatchWholeWord = True
.MatchWildcards = True
For i = LBound(vFindText) To UBound(vFindText)
.Text = vFindText(i)
.Replacement.Text = vReplText(i)
.Execute Replace:=wdReplaceAll
Next i
End With
End Sub

Las mejores herramientas de productividad de oficina

Kutools for Word - Mejore su experiencia con Word con Over 100 ¡Características notables!

Sumérgete en las funciones resaltadas a continuación o haga clic aquí para explorar todo el poder de Kutools para Word.

📘 Dominio del documento: Dividir páginas  /  Combinar documentos  /  Exportar selección en varios formatos (PDF/TXT/DOC/XLSX)  /  Convertir por lotes a PDF  /  Exportar páginas como imágenes  /  Imprima varios archivos a la vez ...

Edición de contenidos: Buscar y reemplazar por lotes en varios archivos   /  Cambiar el tamaño de todas las imágenes   /  Transponer filas y columnas de tabla  /  Convertir tabla en texto ...

🧹 Limpieza sin esfuerzobarrer Espacios extra  /  Saltos de sección  /   Todos los encabezados  /  Cuadros de texto  /  Los hipervínculos  /  Para obtener más herramientas de eliminación, diríjase a nuestro grupo de eliminación

Inserciones creativas: recuadro Mil Separadores  /  Casillas de verificación  /  Botones de radio  /  Código QR   /  Barcode  /  Tabla de líneas diagonales  /  Título de la ecuación  /  Captura de imagen  /  Pie de tabla  /  Varias imágenes  /  Descubra más en nuestro Grupo Insertar

🔍 Selecciones de precisión: Identificar páginas específicas  /  tablas  /  formas  /  párrafos de encabezado  /  Navega con facilidad usando nuestro Grupo Selecto

Mejoras de estrellas: Navegue rápidamente a cualquier ubicación  /  insertar automáticamente texto repetitivo  /  alternar sin problemas entre ventanas de documentos  /  11 herramientas de conversión ...

Transforma tus tareas de Word con Kutools. 👉 Descargue con prueba de 30 días ahora 🚀.

 
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
The VBA code method for changing "straight" to "smart" quotes worked perfectly! Thank you!
This comment was minimized by the moderator on the site
My problem is that I have work normally in German but have an English document, which I marked as "English". Then I did find&replace and it converted them to lower " and upper " as it would happen in German. I looked at all the settings but I couldn't find it. I changed the dictionary language and everything else I could find to English... any idea?
This comment was minimized by the moderator on the site
This is my problem too. Did you ever find an answer?
This comment was minimized by the moderator on the site
Your explanation for replacing in Find/Replace from instruction #2 on is completely incomprehensible.
This comment was minimized by the moderator on the site
I think I found the explanation on another page. If you simply do a replace all and ask it to replace either single quotes or double quotes with the exact same symbol, it will go through and apply your autocorrect rules, including to replace straight quotes with smart quotes. So it should update those all to smart quotes as it goes.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations