David es escritor y usa mucho los correctores de ortografía, estilo y gramática de Word. A veces encuentra que las sugerencias de Word para corregir la gramática son malas y ha aprendido a ignorarlas. Una cosa con la que tiene problemas es el uso de comillas en los diálogos.

Word no reconoce si David ha dejado las comillas al final o al principio de una oración. Recuerda haber usado un programa de procesamiento de texto hace años que dejaba comillas verdes en su documento para indicar que faltaban comillas. Se pregunta si se puede hacer que Word reconozca las comillas faltantes.

No hay forma de hacer esto de forma nativa dentro de Word. La razón probablemente se reduzca al hecho de que es casi imposible determinar dónde debe comenzar y terminar una cotización. Por ejemplo, si tiene un párrafo que contiene cuatro oraciones y coloca una comilla en algún lugar dentro de ese párrafo, ¿cómo va a determinar Word si esa marca designa el principio o el final de una cita? Si es el principio, ¿cómo sabría Word si la marca final debe estar al final de la oración, al final de la segunda oración o al final del párrafo? (El mismo enigma ocurre si la cita es la cita final, pero la perplejidad de la ubicación se extiende hacia la izquierda en lugar de hacia la derecha).

Combine esta posible confusión con el hecho de que es posible que la comilla de cierre ni siquiera esté en el párrafo actual; podría estar al final de algún párrafo posterior cuando el diálogo que se está marcando realmente termina.

Sin embargo, puede desarrollar una macro que haga al menos algunas comprobaciones elementales por usted. La siguiente macro salta al principio del documento y busca la primera comilla. Luego examina todo, desde ese carácter hasta el final del párrafo. Si está utilizando comillas no tipográficas, básicamente verifica si hay un número par de comillas. Si utiliza comillas tipográficas, comprueba si hay una cotización final para cada cotización inicial. Si alguna de las condiciones es falsa, el texto se resalta.

Sub MarkUnevenQuotes()

Dim sRaw As String     Dim iNorm As Integer     Dim iSmart As Integer     Dim J As Long

Selection.HomeKey Unit:=wdStory     Application.ScreenUpdating = False     Selection.Find.ClearFormatting     With Selection.Find         .Text = """"

.Replacement.Text = ""

.Forward = True         .Wrap = wdFindStop         .Format = True         .MatchCase = False         .MatchWholeWord = False         .MatchWildcards = False         .MatchSoundsLike = False         .MatchAllWordForms = False     End With     Selection.Find.Execute

While Selection.Find.Found         Selection.MoveDown Unit:=wdParagraph, Count:=1, Extend:=wdExtend         Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend         sRaw = Selection.Text         iNorm = 0         iSmart = 0         For J = 1 To Len(sRaw)

If Mid(sRaw, J, 1) = Chr(34) Then                 If iNorm > 0 Then                     iNorm = iNorm - 1                 Else                     iNorm = iNorm + 1                 End If             End If             If Mid(sRaw, J, 1) = Chr(147) Then                 iSmart = iSmart + 1             End If             If Mid(sRaw, J, 1) = Chr(148) Then                 iSmart = iSmart - 1             End If         Next J         If iNorm > 0 Or iSmart > 0 Then             Selection.Range.HighlightColorIndex = wdYellow         End If         Selection.Collapse Direction:=wdCollapseEnd         Selection.Find.Execute     Wend     Selection.HomeKey Unit:=wdStory     Application.ScreenUpdating = True End Sub

Cuando finaliza la macro, lo que termina es un montón de selecciones de texto resaltadas si es necesario verificarlas visualmente. Sin embargo, la macro no encontrará citas finales que estén fuera del párrafo en el que aparece la primera cita.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios WordTips), he preparado una página especial que incluye información útil.

link: / wordribbon-WordTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

WordTips es su fuente de formación rentable en Microsoft Word.

(Microsoft Word es el software de procesamiento de texto más popular del mundo). Este consejo (13293) se aplica a Microsoft Word 2007, 2010, 2013, 2016 y Word en Office 365.