Etiqueta: RAE

 

Macro para eliminar las tildes que sobran

Word y ortografía

Word y ortografía

Hace poco leí en varios periódicos digitales el siguiente titular:

LA RAE PIERDE LA BATALLA CONTRA LA TILDE EN LAS PALABRAS ‘SÓLO’ Y ‘ÉSTE’

 

Esto podría ser cierto si la RAE, junto con ASALE, hubieran emprendido alguna batalla; pero no es así, como puede comprobarse en la página 269 de la OLE-2010, donde las academias explican perfectamente los casos específicos del adverbio solo y de los demostrativos (§ 3.4.3.3) y dicen que «a partir de ahora se podrá prescindir de la tilde en estas formas incluso en casos de doble interpretación»: como adverbio o como adjetivo, en el caso de solo, y como pronombres o determinantes, en el caso de «los demostrativos este, ese y aquel, con sus femeninos y plurales». Es decir, que también se podrá continuar añadiendo la tilde como se venía haciendo hasta ahora en los casos en los que esta sea pertinente.

Yo prefiero prescindir de las tildes, pues, como bien indica la OLE, el contexto suele salvar casi siempre los posibles casos de ambigüedad y, si ello no ocurre, busco alguna solución alternativa.

Y para unificar criterios, y por si acaso se me escapa alguna tilde en estas palabras, cosa que pudiera ocurrir, pues pertenezco a una generación que hasta la fecha siempre las había tildado cuando hacía falta, he grabado una macro para Word 2010 donde no solo se eliminan en solo, este, ese y aquel (con sus femeninos y sus plurales), sino que también las elimina de una serie de palabras que nunca deben llevarla, como el posesivo ti, pero también algún sustantivo, como truhan, o las formas verbales di, del verbo dar, crie, crio, criais, crieis, del verbo criar, y así hasta un total de cincuenta y dos formas en una lista abierta que puede ir creciendo conforme surjan más casos.

A la macro la he denominado «Tildes» —en otro alarde de poca imaginación de los que suelen caracterizarme :)— y os la copiopego aquí para que podáis hacer lo propio en vuestra aplicación de tratamiento de textos:

Sub Tildes()

‘ Tildes Macro


Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = “éste”
.Replacement.Text = “este”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “ése”
.Replacement.Text = “ese”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “aquél”
.Replacement.Text = “aquel”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “ésta”
.Replacement.Text = “esta”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “ésa”
.Replacement.Text = “esa”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “aquélla”
.Replacement.Text = “aquella”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “ésto”
.Replacement.Text = “esto”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “éso”
.Replacement.Text = “eso”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “aquéllo”
.Replacement.Text = “aquello”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “éstos”
.Replacement.Text = “estos”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “ésos”
.Replacement.Text = “esos”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “aquéllos”
.Replacement.Text = “aquellos”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “éstas”
.Replacement.Text = “estas”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “ésas”
.Replacement.Text = “esas”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “aquéllas”
.Replacement.Text = “aquellas”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “sólo”
.Replacement.Text = “solo”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “dí”
.Replacement.Text = “di”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “tí”
.Replacement.Text = “ti”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “truhán”
.Replacement.Text = “truhan”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “crié”
.Replacement.Text = “crie”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “crió”
.Replacement.Text = “crio”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “criáis”
.Replacement.Text = “criais”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “criéis”
.Replacement.Text = “crieis”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fié”
.Replacement.Text = “fie”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fió”
.Replacement.Text = “fio”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fiáis”
.Replacement.Text = “fiais”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fiéis”
.Replacement.Text = “fieis”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fluí”
.Replacement.Text = “flui”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fluís”
.Replacement.Text = “fluis”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = “frió”
.Replacement.Text = “frio”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “friáis”
.Replacement.Text = “friais”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “friáis”
.Replacement.Text = “friais”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fruí”
.Replacement.Text = “frui”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fruís”
.Replacement.Text = “fruis”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “guié”
.Replacement.Text = “guie”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “guió”
.Replacement.Text = “guio”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “guiáis”
.Replacement.Text = “guiais”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “guiéis”
.Replacement.Text = “guieis”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “huí”
.Replacement.Text = “hui”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “huís”
.Replacement.Text = “huis”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “lié”
.Replacement.Text = “lie”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “lió”
.Replacement.Text = “lio”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “liáis”
.Replacement.Text = “liais”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “liéis”
.Replacement.Text = “lieis”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “pié”
.Replacement.Text = “pie”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “pió”
.Replacement.Text = “pio”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “piáis”
.Replacement.Text = “piais”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “piéis”
.Replacement.Text = “pieis”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “rió”
.Replacement.Text = “rio”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “riáis”
.Replacement.Text = “riais”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = False
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “Ruán”
.Replacement.Text = “Ruan”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = True
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “Sión”
.Replacement.Text = “Sion”
.Forward = True
.Wrap = wdFindContinue
.MatchCase = True
.MatchWholeWord = True
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
End Sub

NOTA: Si os gusta esta web, podéis votarla en http://directoriohispanodelasartes.com/literatura/correctores/. Gracias.

à suivre.

El arduísimo proceso editorial

En la entrada de este mes tenía pensado hablar de una novela, que me regalaron los Magos de Oriente, con muy buena pinta, aunque, mientras la leía, me di cuenta de que algo no iba bien, algo fallaba. Se trata de 261 páginas de papel ahuesado, de 90 gr/m, con la tripa cosida y encolada, pastas de unos 200 gr/m con una bella decoración a base de geometrías verdinegras, sobrecubiertas en las que aparece una bonita ilustración alusiva a la historia que contiene rematadas por solapas de 82 mm en las que se glosa la figura de la autora (delante) y se listan otros títulos de la editorial (que no mencionaré aquí por decoro, aunque a lo mejor luego sí que la nombro). Incluso, en un alarde de originalidad de semejantes proporciones a las de su ponderado costo, el extraordinario objeto incluía un precioso recortable con el que los ociosos pueden entretenerse montando un hotel de cartulina, que es donde transcurre la mayor parte de la trama (en un hotel no de cartulina).

Petit hôtel en «petit carton»

Petit hôtel en «petit carton»

Por otra parte, se trataba de una buena traducción del original inglés (esto debo suponerlo, porque, como comprenderéis, no lo he tenido en mis manos para juzgar de la manera más ecuánime posible, aunque reconozco que el inglés no es mi fuerte).

Entonces ¿qué era lo que fallaba?

Muy fácil: aquel «libro» no había pasado por ningún proceso de corrección, ni de estilo ni ortotipográfica, y esto es algo que nunca entenderé, y menos en este caso (una verdadera lástima, porque la historia en sí es interesante), donde salta a la vista que no han escatimado un euro en otras cuestiones, ni siquiera en recortables.

En los pocos años que llevo en el mundo de la edición, he visto nacer unas cuantas editoriales, en no pocas ocasiones con más buena voluntad que acierto, pues, en principio, para establecerse uno como editor nadie le exige ninguna preparación previa.

Algunos amantes de la literatura ―o de los libros en general, conocidos en catalán con el eufónico calificativo de lletraferits― se lanzan a la gran aventura de editar sin haberse preocupado de enterarse antes de cuáles son las fases de que consta el proceso de edición, o, lo que es lo mismo, desconociendo qué es exactamente el producto que intentan vendernos. Por ello me ha parecido oportuno explicar aquí, aunque sea de forma somera (y, si cabe, con algo de humor), qué características ha de tener un libro para que sea considerado como tal.

Para empezar, tenemos que saber de lo que estamos hablando, para lo que acudiremos a la definición de la RAE:

libro. (Del lat. liber, libri). | 1. m. Conjunto de muchas hojas de papel u otro material semejante que, encuadernadas, forman un volumen. | 2. m. Obra científica, literaria o de cualquier otra índole con extensión suficiente para formar volumen, que puede aparecer impresa o en otro soporte. Voy a escribir un libro. La editorial presentará el atlas en forma de libro electrónico. […]. | 3. m. Der. Para los efectos legales, en España, todo impreso no periódico que contiene 49 páginas o más, excluidas las cubiertas. […].

(He obviado aquí las acepciones que he estimado convenientes para los fines que se persiguen).

Con respecto a la primera acepción de la entrada, me gustaría recordar unas palabras de Marcos Mundstock:

«Un libro que no está escrito, más que libro, es un cuaderno». (LES LUTHIERS)

Esto no es el libro blanco de nada

Esto no es el libro blanco de nada

Respecto de la tercera acepción (la referida al número de páginas), cabe explicar que se trata de una de las características que recoge una definición técnica de la Unesco (United Nations Educational, Scientific and Cultural Organization, [Organización de las Naciones Unidas para la Educación, la Ciencia y la Cultura, por sus siglas en inglés]) «destinada a unificar, desde un punto de vista estadístico, la noción de libro. […] Esta definición se basa en una unidad de pliego de 16 páginas, de tal manera que no puede considerarse libro, estadísticamente hablando, si la obra, trate de lo que trate y cualquiera que sea su formato, no tiene más de tres pliegos de 16 páginas (o su equivalente), pues, como hemos visto, si solo tiene entre cinco y 48 páginas se llama folleto, y si solo tiene entre dos y cuatro, hoja suelta». (José M. de Sousa: Manual de edición y autoedición; Madrid: Pirámide; 2.ª edición, 2.ª impresión; 2008; pág. 66-67).

Sin embargo, hoy hay que ampliar esta definición debido, como bien sabemos, a los nuevos soportes electrónicos: los libros digitales ya no tienen páginas, bien sean textuales, videolibros o audiolibros. Cuando uno está leyendo uno de estos e-books, el dispositivo lector utilizado no suele informar de la página por la que se va leyendo, sino del porcentaje de lo leído.

—Oye, co: Te has leído Ana Karénina?

—No, co, pero me la bajé de internet para mi kindle y ya voy por el diez por ciento.

—Tómatelo con calma, co, que solo te faltan unas novecientas páginas de las de antes, y con letra pequeña.

―No me chafes el final, co, que está muy interesante el culebrón.

Tranqui, co, que no voy a espoileártela.

Libros sin páginas

Libros sin páginas

Sabido esto, nos arremangaremos para ir directamente al meollo de la cuestión:

El arduísimo proceso editorial

En el proceso editorial consta de varias fases, algunas de las cuales deberían ser ineludibles:

  • Creación del texto. Se trata de redactar o traducir un texto ajustándose a unas determinadas normas de estilo (1.ª fase). El texto traducido debería de pasar una revisión de la traducción (2.ª fase) que debería realizar una persona distinta al traductor. Esta última fase ya se lo salta a la torera alguna editorial (o alguna empresa que edita otro tipo de documentos que no son libros).
  • Tratamiento del texto. Una vez insertados los cambios de la revisión, habría que proceder a la revisión del contenido e insertar los cambios correspondientes (3.ª fase); luego, se debería realizar una corrección de estilo (4.ª fase) y, por último, una corrección de primeras pruebas (5.ª fase). En cada una de estas fases hay que ir introduciendo los cambios correspondientes: el texto y, por lo tanto, el posible lector, salen ganando, aunque el autor debe conceder el nihil obstat al texto definitivo.

 

Escritor anónimo

Escritor anónimo

«A mi no me canvias tu ni una tilde, de mi testo». (Autor anónimo).

  • Maquetación. La maquetación no se la salta nadie, porque, si no, volveríamos a tener un cuaderno. Si el texto lleva imágenes, ahora es el momento de incorporarlas en la maqueta (6.ª fase), lo que conlleva una o varias nuevas correcciones ortotipográficas (7.ª fase). Algunos piensan que esta fase sobra, pero si no se realiza pueden aparecer callejones o blancos de más en el texto, separaciones incorrectas de palabras al final de la línea, pueden producirse coincidencias de palabras iguales en líneas sucesivas e incluso puedes encontrarte con alguna sorpresa en los pies de foto, como ilustra el bello ejemplo en formato jotapegé.

 

«Regata de traineras en la ría de Bilbao» (Un mal pie de foto)

«Regata de traineras en la ría de Bilbao»
(Un mal pie de foto)

  • Impresión. En este apartado se incluye la compaginación con la correspondiente corrección de compaginadas, la creación de fotolitos, con revisión de ferros, diversas pruebas mecánicas y, por último, antes de encuadernar, también hay que verificar los pliegos (fases 8.ª, 9.ª, 10.ª y 11.ª). De estas fases, excepto de la  8.ª, como se encarga la imprenta, no se deja ninguna sin hacer.
  • Encuadernación, almacenaje y distribución (fases 12.ª, 13.ª y 14.ª). En este apartado, los libros deberían de someterse a los controles de calidad correspondientes (fase 15.ª), pero hay quien, con ver las cajas llenas y ojear un ejemplar, da por cumplimentado el trámite: ¿quién no se ha topado alguna vez ―aunque ahora ya sería rarísimo― con algún libro, además de intenso, intonso?
libro intonso

Libro intonso

 

No está de más aquí recomendar a los lectores que a la hora de adquirir un libro pierdan el mismo tiempo que cuando van a comprarse, no digo ya un automóvil, sino cualquier electrodoméstico, y también cabe recordar que tienen derecho a la devolución del dinero si el producto no les satisface: ello representa el mejor control de calidad posible.

En resumen (que no es gerundio)

¿Os imagináis al bueno de Daniel «Dan» Brown habilitando un búnker como el que montó para los traductores de su obra Inferno para cada grupo de personas que deberían haber intervenido en el proceso de edición? ¡No hubiera ganado para búnkeres! Así que se ahorró unos cuantos dólares, pero seguro que ha perdido un buen número de lectores (yo mismo, por ejemplo).

Por ello, y aunque hoy las modernas técnicas nos permitan agilizar enormemente las tareas de edición, si las editoriales quieren dotar de calidad a los libros que producen, no deberían saltarse ninguno de los pasos arriba expuestos: podrán buscar el ahorro en el gramaje o la calidad del papel, las tapas, las sobrecubiertas e incluso en recortables, pero lo que nunca nunca nunca deberían hacer es ahorrarse dinero en traductores ni correctores profesionales, y repito también lo de profesionales, porque existe una gran diferencia entre que las chapuzas de casa las pongas en manos de un fontanero, electricista o albañil profesional a que las fíes al manitas de tu cuñao, que estuvo una temporada de peón y otra desatascando cañerías.

En ello estriba la diferencia entre un libro, un seudolibro, un paralibro, un antilibro o, directamente, un cuaderno.

Nota: Para desarrollar los comentarios sobre las distintas fases del proceso de edición me he basado en una unidad didáctica del Curso de Corrección Profesional de la academia Cálamo&Cran, de Madrid, que realicé en línea hace unos años, y que recomiendo a todo letraherido que se precie de serlo. Al fin callo el título y la editorial del recortable por haber recortado —como mínimo— en las fases dos, tres, cuatro, cinco, siete y ocho, no sea que alguien pique y se lo compre.

… à suivre.

Macro para unificar secuencias que se escriben en una o más palabras con idéntico valor

¿Cómo se escribe: ‘en seguida’ o ‘enseguida’? ¿’Así mismo’ o ‘asimismo’? ¿’Al rededor’ o ‘alrededor’? ¿’Cortocircuito’, ‘corto circuito’, ‘corta circuito’ o ‘cortacircuito’? En español hay algunas secuencias de palabras que pueden escribirse en un solo término o en varios sin que cambie su significado. También existen otras expresiones que varían su valor dependiendo de si las escribimos en una o varias palabras: no es lo mismo ‘en torno’ que ‘entorno’. En esta entrada ofrezco una herramienta a los escritores, correctores y, en general a todas aquellas personas interesadas por el lenguaje para unificar las secuencias que se escriben en una o más palabras con idéntico valor.

Se trata de una macro para Word que he elaborado después de analizar los listados que ofrece, por un lado, la RAE en su Ortografía de la lengua española del 2010 (OLE-2010) y, por otro, la que recoge José Martínez de Sousa en Ortografía y ortotipografía del español actual (Gijón: Ed. Trea, 2008; 2.ª edición, corregida).

Como se puede comprobar, ambas listas no coinciden completamente; por ello cito los criterios que ambas obras utilizan y los listados completos, y, al final, he pegado la macro resultante, después de analizarlas y reducirlas a una sola.

Aunque todas las expresiones pueden considerarse correctas, siempre existe una preferencia explícita sobre unas u otras formas. Son precisamente estas expresiones preferidas (o recomendadas) las que se han incluido en la macro. Para aquellas personas que no conozcan muy bien las labores de los correctores profesionales, conviene recordar que una de ellas es la de unificar las formas a lo largo de los textos que les toca corregir para que el lector no se vea despistado.

Por otra parte, los diferentes escritores o editores pueden tener a su vez preferencias distintas, lo cual , como es obvio, debe aceptarse. Con la herramienta ‘Buscar y reemplazar’ que ofrece la aplicación de tratamiento de textos de Word, puede unificarse el criterio planteado en cada ocasión, una vez ejecutada la macro.

OLE-2010 (RAE)

Secuencias que se escriben en una o más palabras con idéntico valor

«Aunque las dos variantes se documenten en el uso y resulten admisibles, se señala en todos los casos en que ello es posible la grafía que debe usarse con preferencia, para intentar limitar al máximo la dispersión gráfica que supone la existencia de varias formas de escritura para una misma expresión. En muchos casos, se desaconsejan de manera explícita grafías admitidas con anterioridad, bien por ser ya claramente minoritarias o para evitar confusiones con secuencias de idéntica forma, pero con diferente significado». (OLE-2010, pág. 546).

GRAFÍA PREFERIDA

GRAFÍA DESACONSEJADA

a cal y canto a calicanto
a machamartillo a macha martillo
a maltraer a mal traer
a matacaballo a mata caballo
a rajatabla a raja tabla
a tocateja a toca teja
a vuelapluma a vuela pluma
aguanieve agua nieve
alrededor al rededor
altamar alta mar
altorrelieve alto relieve
aposta a posta
aprisa a prisa
arcoíris arco iris
bajorrelieve bajo relieve
bienvenido bien venido
bienvenida bien venida
bocabajo boca abajo
bocarriba boca arriba
buenaventura buena ventura
calicanto cal y canto
camposanto campo santo
caradura cara dura
casaquinta casa quinta
cielorraso cielo raso
cubalibre cuba libre
deprisa de prisa
dizque diz que
donjuán don juan
enfrente en frente
enhorabuena en hora buena
enseguida en seguida
entremedias entre medias
entretanto entre tanto
exlibris ex libris
fueraborda fuera borda
fuerabordo fuerabordo
guardia civil guardiacivil
guardiamarina guardia marina
hierbabuena hierba buena
hierbaluisa hierba luisa
librecambio libre cambio
maleducado mal educado
medialuna media luna
medianoche media noche
medioambiente medio ambiente
Nochebuena Noche Buena
Nochevieja Noche Vieja
padrenuestro padre nuestro
Perogrullo Pero Grullo
puercoespín puerco espín
quintaesencia quinta esencia
sanseacabó san se acabó
sobremanera sobre manera
tosferina tos ferina
viacrucis vía crucis

OOTEA (J. Martínez de Sousa)

«Cualquiera que sea la preferencia académica, se ha situado en primer lugar la grafía en una sola palabra, que en principio debería ser la preferida. Adoptando esta postura, es decir, soslayando las formas en dos o más términos, se consigue simplificar las dudas ortográficas que su escritura presenta». (OOTEA, 2.ª edición, pág. 285).

 GRAFÍA PREFERIDA

 GRAFÍA DESACONSEJADA

a la chitacallando a la chita callando
a espetaperros a espeta perros
a machamartillo a macha martillo
a mansalva a man salva
a matacaballo a mata caballo
a muerdisorbe a muerde y sorbe
a quemarropa a quema ropa
a rajatabla a raja tabla
a regañadientes a regaña dientes
a salvamano a salva mano
a tocateja a toca teja
a trochemoche a troche y moche
a vuelapluma a vuela pluma
abarrisco a barrisco
adentro a dentro
adonde a donde
agnusdéi agnus Dei
aguacafé agua café
aguacibera agua cibera
aguanafa agua nafa
aguanieve agua nieve
aguaviento agua viento
ajorro a jorro
alderredor al derredor
alrededor al rededor
altorrelieve alto relieve
anteanoche antes de anoche
anteayer antes de ayer
apenas a penas
aposta a posta
aprisa a prisa
asafétida asa fétida
asimismo así mismo
avefría ave fría
bajorrelieve bajo relieve
balarrasa bala rasa
bocabajo boca abajo
buenaventura buena ventura
camposanto campo santo
cañaduz caña duz
caradura cara dura
cortocircuito corto circuito
cortacircuito
corta circuito
cuantimás cuanto y más
de chichinabo de chicha y nabo
de quitapón de quita y pon
de sobremesa de sobre mesa
deprisa de prisa
dondequiera donde quiera
dondiego don diego
donjuán don juán
dompedro don pedro
doquiera do quiera
enfrente en frente
enhorabuena en hora buena
enhoramala en hora mala
enseguida en seguida
entretanto entre tanto
exlibris ex libris
francocuartel franco cuartel
fueraborda fuera de borda
gentilhombre gentil hombre
gloriapatri gloria Patri
hierbabuena hierba buena
hojalata hoja de lata
hoja lata
infraganti in fraganti
librecambio libre cambio
malandanza mala andanza
masecoral maese coral
malavenido mal avenido
malhumor mal humor
maltraer mal traer
malvarrosa malva rósea
malva rosa
maremagno mare mágnum
mediagua media agua
medianoche media noche
montepío monte pío
Nochebuena Noche Buena
Nochevieja Noche Vieja
padrenuestro padre nuestro
pamperdido pan perdido
¡porvida! ¡por vida!
prorrata pro rata
purasangre pura sangre
quintaesencia quinta esencia
sanseacabó san se acabó
sinhueso sin hueso
sobremanera sobre manera
sobrepeine sobre peine
talvez tal vez
tiquismiquis tiquis miquis

 

Combinando ambas listas de secuencias, y efectuando algunos ajustes, he elaborado la siguiente macro, que he denominado «Secuencias», que, si os interesa, podéis copiar y pegar directamente en Visual Basic.

Sub Secuencias()

‘ Secuencias Macro
‘ Unifica las secuencias que se escriben en una o más palabras con idéntico valor. Ej.: enseguida/en seguida

Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = “¡por vida!”
.Replacement.Text = “¡porvida!”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a calicanto”
.Replacement.Text = “a cal y canto”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a espeta perros”
.Replacement.Text = “a espetaperros”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a la chita callando”
.Replacement.Text = “a la chitacallando”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a macha martillo”
.Replacement.Text = “a machamartillo”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a mal traer”
.Replacement.Text = “a maltraer”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a man salva”
.Replacement.Text = “a mansalva”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a mata caballo”
.Replacement.Text = “a matacaballo”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a muerde y sorbe”
.Replacement.Text = “a muerdisorbe”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a quema ropa”
.Replacement.Text = “a quemarropa”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a raja tabla”
.Replacement.Text = “a rajatabla”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a regaña dientes”
.Replacement.Text = “a regañadientes”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a salva mano”
.Replacement.Text = “a salvamano”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a toca teja”
.Replacement.Text = “a tocateja”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a troche y moche”
.Replacement.Text = “a trochemoche”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a vuela pluma”
.Replacement.Text = “a vuelapluma”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a barrisco”
.Replacement.Text = “abarrisco”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a dentro”
.Replacement.Text = “adentro”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a donde”
.Replacement.Text = “adonde”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “agua café”
.Replacement.Text = “aguacafé”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “agua cibera”
.Replacement.Text = “aguacibera”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “agua nafa”
.Replacement.Text = “aguanafa”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “agua nieve”
.Replacement.Text = “aguanieve”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “agua viento”
.Replacement.Text = “aguaviento”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a jorro”
.Replacement.Text = “ajorro”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “al derredor”
.Replacement.Text = “alderredor”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “al rededor”
.Replacement.Text = “alrededor”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “alta mar”
.Replacement.Text = “altamar”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “alto relieve”
.Replacement.Text = “altorrelieve”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “antes de anoche”
.Replacement.Text = “anteanoche”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “antes de ayer”
.Replacement.Text = “antesdeayer”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a penas”
.Replacement.Text = “antesdeayer”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a penas”
.Replacement.Text = “apenas”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a posta”
.Replacement.Text = “aposta”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “a prisa”
.Replacement.Text = “aprisa”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “arco iris”
.Replacement.Text = “arcoíris”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “asa fétida”
.Replacement.Text = “asafétida”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “así mismo”
.Replacement.Text = “asimismo”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “ave fría”
.Replacement.Text = “avefría”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “bajo relieve”
.Replacement.Text = “bajorrelieve”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “bala rasa”
.Replacement.Text = “balarrasa”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “bien venida”
.Replacement.Text = “bienvenida”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “bien venido”
.Replacement.Text = “bienvenido”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “boca abajo”
.Replacement.Text = “bocabajo”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “boca arriba”
.Replacement.Text = “bocarriba”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “buena ventura”
.Replacement.Text = “buenaventura”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “cal y canto”
.Replacement.Text = “calicanto”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “campo santo”
.Replacement.Text = “calicanto”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “campo santo”
.Replacement.Text = “camposanto”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “caña duz”
.Replacement.Text = “cañaduz”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “cara dura”
.Replacement.Text = “caradura”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “casa quinta”
.Replacement.Text = “casaquinta”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “cielo raso”
.Replacement.Text = “cielorraso”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “corto circuito”
.Replacement.Text = “cortocircuito”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “cortacircuito”
.Replacement.Text = “cortocircuito”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “corta circuito”
.Replacement.Text = “cortocircuito”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “cuanto y más”
.Replacement.Text = “cuantimás”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “de chicha y nabo”
.Replacement.Text = “de chichinabo”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “de sobre mesa”
.Replacement.Text = “de sobremesa”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “de prisa”
.Replacement.Text = “deprisa”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “diz que”
.Replacement.Text = “dizque”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “donde quiera”
.Replacement.Text = “dondequiera”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “don diego”
.Replacement.Text = “dondiego”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “don juan”
.Replacement.Text = “donjuán”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “do quiera”
.Replacement.Text = “doquiera”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “en frente”
.Replacement.Text = “enfrente”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “en hora buena”
.Replacement.Text = “enhorabuena”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “en hora mala”
.Replacement.Text = “enhoramala”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “en seguida”
.Replacement.Text = “enseguida”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “entre medias”
.Replacement.Text = “entremedias”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “entre medias”
.Replacement.Text = “entremedias”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “ex libris”
.Replacement.Text = “exlibris”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “franco cuartel”
.Replacement.Text = “francocuartel”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fuera borda”
.Replacement.Text = “fueraborda”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fuera de borda”
.Replacement.Text = “fueraborda”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fuera bordo”
.Replacement.Text = “fueraborda”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “fuera de bordo”
.Replacement.Text = “fueraborda”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “gentil hombre”
.Replacement.Text = “gentilhombre”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “gloria Patri”
.Replacement.Text = “gloriapatri”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “guardia marina”
.Replacement.Text = “guardiamarina”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “hierba buena”
.Replacement.Text = “hierbabuena”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “hierba luisa”
.Replacement.Text = “hierbaluisa”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “hoja de lata”
.Replacement.Text = “hojalata”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “hoja lata”
.Replacement.Text = “hojalata”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “in fraganti”
.Replacement.Text = “infraganti”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “libre cambio”
.Replacement.Text = “librecambio”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “mala andanza”
.Replacement.Text = “malandanza”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “mal educado”
.Replacement.Text = “maleducado”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “mal avenido”
.Replacement.Text = “malavenido”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “mal humor”
.Replacement.Text = “malhumor”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “mal traer”
.Replacement.Text = “maltraer”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “malva rósea”
.Replacement.Text = “malvarrosa”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “malva rosa”
.Replacement.Text = “malvarrosa”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “mare mágnum”
.Replacement.Text = “maremagno”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “maese coral”
.Replacement.Text = “masecoral”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “media agua”
.Replacement.Text = “mediagua”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “media luna”
.Replacement.Text = “mediagua”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “media luna”
.Replacement.Text = “medialuna”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “media noche”
.Replacement.Text = “medianoche”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “medio ambiente”
.Replacement.Text = “medioambiente”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “monte pío”
.Replacement.Text = “montepío”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “Noche Buena”
.Replacement.Text = “Nochebuena”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “Noche Vieja”
.Replacement.Text = “Nochevieja”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “padre nuestro”
.Replacement.Text = “padrenuestro”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “pan perdido”
.Replacement.Text = “panperdido”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “pro rata”
.Replacement.Text = “prorrata”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “puerco espín”
.Replacement.Text = “puercoespín”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “pura sangre”
.Replacement.Text = “purasangre”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “quinta esencia”
.Replacement.Text = “quintaesencia”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “san se acabó”
.Replacement.Text = “sanseacabó”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “sobre manera”
.Replacement.Text = “sobremanera”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “sobre peine”
.Replacement.Text = “sobrepeine”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “tiquis miquis”
.Replacement.Text = “tiquismiquis”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “tos ferina”
.Replacement.Text = “tosferina”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “vía crucis”
.Replacement.Text = “viacrucis”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “agnus Dei”
.Replacement.Text = “agnusdéi”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “cuba libre”
.Replacement.Text = “cubalibre”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “don pedro”
.Replacement.Text = “donpedro”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “don juan”
.Replacement.Text = “donjuán”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “don juán”
.Replacement.Text = “donjuán”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “guardiacivil”
.Replacement.Text = “guardia civil”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “guardiaciviles”
.Replacement.Text = “guardias civiles”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “Noche Buena”
.Replacement.Text = “Nochebuena”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “Noche Vieja”
.Replacement.Text = “Nochevieja”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “pedro jiménez”
.Replacement.Text = “pedrojiménez”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = “Pero Grullo”
.Replacement.Text = “Perogrullo”
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

 

Espero que os sirva.

…à suivre.

La fiebre editora de la RAE (y ASALE)

Hace poco me pasé por la librería Anónima de Huesca y me sorprendió descubrir en sus expositores una serie de nuevas publicaciones de la RAE (y ASALE) de las que no tenía noticia o, como decía un antiguo compañero de trabajo, no tenía «ni loción».

Se trata de ediciones nuevas de las últimas grandes obras editadas, a saber, la Gramática y la Ortografía, pero en formatos distintos: de lujo, básica, de bolsillo… Hay para todos los gustos.

Por qué precisamente ahora se produce esta avalancha de publicaciones y a qué fines responde es algo que merece una pequeña reflexión.

Teniendo en cuenta la atroz crisis por la que estamos atravesando en España en la actualidad no se entiende muy bien el fenómeno, ano ser que abramos nuestras mentes y demos con la palabra mágica: globalización.

Debemos pensar, como la RAE, que el mercado de habla hispana es inmenso y que no todos los países están sufriendo de la misma manera las consecuencias de este valle económico. Por ejemplo, solo en México existen cien millones de hispanohablantes, una golosina que hay que exprimir.

Lo que me parece un poco desproporcionado es el precio venal de salida al mercado (13 euros por la ortografía reducida), teniendo en cuenta que el organismo está subvencionado por el Estado y, concretamente esta edición, por una firma comercial —cuyo nombre no citaré—. Si de verdad el objetivo principal fuera divulgar conocimientos, el precio de venta del librito no debería sobrepasar los tres euros.

Pero manda el vil metal, como siempre.

A mí ya me parece bien que se note que hay movimiento, aunque debo reconocer que mi espíritu coleccionista se diluyó con las viejas cintas de vídeo y, dada mi actual situación laboral como freelance a temporadas, no puedo permitirme demasiados lujos bibliográficos.

Estoy haciendo sangre para el nuevo diccionario, cuya aparición está anunciada para el próximo año, que espero lo editen con un tamaño de letra lo suficientemente legible.

Gracias.

…à suivre.

Se escriben con ‘b’

En mis horas de estudio de la nueva Ortografía de la lengua española (Madrid: RAE y ASALE, en colaboración con Espasa, 2010) me ha dado cuenta de que se sigue arrastrando un error en el enunciado —que parece una cantinela— que todos hemos oído en la escuela al aprender esta disciplina:

Se escriben con b […] las palabras que empiezan por… Se escriben con b […] las palabras que acaban por…

Y luego sigue: por las secuencias o por las terminaciones siguientes.

¿Cuál es el error? Pues en lo que he subrayado: no son las palabras las que se escriben con b, sino las secuencias fónicas.

En efecto, en la página 95 de la nueva Ortografía se puede leer:

[También] se escriben con b las palabras que presentan las terminaciones siguientes:

• Las palabras terminadas en -bilidad: amabilidad, debilidad, estabilidad, habilidad, posibilidad, sensibilidad, visibilidad. Excepciones…

… un momento: ¿visibilidad se escribe solo con b? Yo también veo una v al principio. Lo mismo ocurre con algunos ejemplos que da la propia obra:

Las palabras terminadas en -bundo (pág. 95): vagabundo

En los casos anteriores tendría que haber dicho: Las terminaciones de las palabras acabadas en -bilidad, -bundo, o Las secuencias gráficas finales como -bilibad, -bundo. Y sigue.

Las palabras compuestas cuyo primer elemento es bien o que comienzan con su forma latina bene (pág. 96): bienaventurado, bienvenida, benevolente

Aquí habría que haber dicho: El primer elemento de las palabras compuestas por bien o por bene.

Pasemos a la v (pág. 98):

Se escriben con v…

Las palabras que comienzan por (…) vice-, viz- o vi- (‘en vez de’ o ‘que hace las veces de’): vicegobernador [ejemplo mío]

Las palabras que terminan en (…) -‘voro/a (‘que se alimenta de’): herbívoro

Aquí lo estrictamente correcto hubiera sido, también, referirse no a las palabras, como vemos, sino a las secuencias fónicas.

Si lo de la b y la v hay quien no lo ve muy claro, pensemos en cuántos millones de hispanohablantes tienen problemas importantes para utilizar correctamente la s, la c y la z. En las páginas 129 y siguientes las Academias tratan de arrojar luz sobre esta oscura zona donde ceceo y seseo se combinan.

A este —para muchos— inextricable  mundo de sibilantes e interdentales varias la nueva Ortografía le dedica un total de ¡18 páginas 18! Y continúa con la cantinela:

Se escriben con s las palabras que empiezan / terminan por:

semi- (‘medio’ o ‘casi’): semicírculo

iso- (‘igual’): isósceles

-ésimo/a: centésimo, cienmilésimo

Se escriben con c ante e, i las palabras que empiezan / terminan por:

-encia: ausencia

-ancio: cansancio

-cial: superficial

-áceo: grisáceo

Se escriben con z las palabras que empiezan / terminan por:

-anza: enseñanza

Y podría continuar con más ejemplos donde habría que expresar de otra manera lo que se quiere decir. No parece que esta obra consiga la precisión ni la claridad que pretende en su declaración de intenciones, pero es lo mejor que tenemos y habrá que seguir estudiándosela.

Si esto parece rizar el rizo, a mí más me lo parece —por ejemplo— el que las Academias, con afán de simplificar, se inventen un nuevo sistema para representar los fonemas del español (pág. XLVII): no teníamos bastante con el alfabeto fonético de la Revista de Filología Española (RFE) ni con el alfabeto fonético internacional (AFI), «usados en la tradición hispánica durante décadas». Este último trata de recoger todos los signos para representar los fonemas de todas las lenguas, incluida la nuestra, y que, bajo mi punto de vista, nos hubiera venido mejor para representar todas las realizaciones fonológicas posibles de nuestra lengua. Todo sea en pro de la simplicidad. ;)

…à suivre.

Portada de la _Ortografía_ de Mateo Alemán de 1609

 

Uso de cookies

Este sitio web utiliza cookies para que usted tenga la mejor experiencia de usuario. Si continúa navegando está dando su consentimiento para la aceptación de las mencionadas cookies y la aceptación de nuestra política de cookies, pinche el enlace para mayor información.plugin cookies

ACEPTAR
Aviso de cookies