Cómo contar caracteres con AutoHotkey

Ya vimos en este artículo cómo tener el recuento de caracteres en las aplicaciones de Word, Excel y Trados Studio. Ahora te daré una forma rápida de contar caracteres: ¡con AutoHotkey! Además, te servirá para cualquier aplicación, incluidas las tres aplicaciones de antes.

1.ª Macro para contar caracteres con AutoHotkey

Nos metemos ya de lleno en crear una macro de AutoHotkey para poder contar caracteres del texto seleccionado, así nos servirá para los dos casos prácticos de antes.

La macro de AutoHotkey que uso para conseguir el número de caracteres es la siguiente:

; -----------------------------------------------------------------
; 1.ª macro para contar caracteres en AutoHotkey (con/sin espacios)
; www.gonduana.com/contar-caracteres-con-autohotkey
; -----------------------------------------------------------------
; WIN + ALT + R
retorno := "`r`n"
#!r::		
	Clipboard=
	SendInput, ^c
	ClipWait, 0

	cadena := Clipboard
	cadena := StrReplace(cadena, retorno, "")
	cadena := StrReplace(cadena, A_Tab, A_SPACE)
	caracteres := StrLen(cadena)

	StrReplace(cadena, A_SPACE,, espacios)
	caracteresSinEspacios := caracteres - espacios
	
	MsgBox 0, Recuento de caracteres, %caracteresSinEspacios% caracteres SIN espacios %retorno%%caracteres% caracteres CON espacios, 6
return

Te puedes descargar la macro desde aquí:

Explicación de la 1.ª macro

Antes de ejecutar la macro, selecciona el texto del que quieres conocer el número de caracteres y pulsa la combinación de teclas WINDOWS + ALT + R. Por supuesto, si no te gusta este atajo, puedes cambiarlo.

Una vez ejecutada la macro, se mostrará enseguida el siguiente cuadro de diálogo:

Veamos poco a poco la macro, por si quieres modificarla y dejarla a tu gusto:

En la línea 6 se define una variable retorno que es un retorno de línea (`n) más un retorno de carro (`r). Esta variable la usaremos más adelante. Paciencia, hermano…

Las líneas 8 a 10 copian el texto seleccionado en el Portapapeles de Windows.

La línea 12 pasa el contenido del Portapapeles a una variable llamada cadena, que será la que procesaremos para encontrar el número de caracteres.

La línea 13 borra los retornos. Para ello se emplea la función StrReplace, que sustituye la variable cadena por el tercer parámetro, una cadena vacía (""), es decir, se borra cada retorno del texto seleccionado. La cadena producto de las sustituciones de los retornos existentes se llama también cadena. Podríamos usar otro nombre, pero prefiero mantener el mismo. Esta línea está solo para igualar el número de caracteres que nos da la macro con los recuentos de Word. En la 2.ª versión de la macro te doy otra posibilidad.

Seguimos con la línea 14, en la que se reemplaza cada tabulación por un espacio. Así es como trata Word a las tabulaciones, lo cual me parece correcto. Como la línea anterior, también se emplea la función StrReplace, pero esta vez se busca una variable integrada en AutoHotkey, que es A_Tab y sustituye cada tabulación por un espacio (otra variable integrada, A_SPACE).  La cadena producto de las sustituciones de las tabulaciones se llama también cadena.

La línea 15 emplea la función StrLen para contar los caracteres de la variable cadena y guarda en la variable caracteres el número de caracteres.

La línea 17 cuenta el número de espacios en el texto seleccionado. Para ello vuelve a emplear  la función StrReplace para borrar cada espacio y guardar en la variable espacios el número de sustituciones realizadas. Como ya no necesitamos cambiar la variable cadena, descartamos la variable de salida sin los espacios.

La línea 18 es una resta: el número de caracteres sin espacios (variable caracteresSinEspacios) es igual al número de caracteres con espacios (variable caracteres) menos el número de caracteres encontrados en la anterior línea (variable espacios).

La última línea simplemente muestra en pantalla dos valores:

• el número de caracteres con espacios
• el número de caracteres sin espacios

El último parámetro de la función MsgBox es el número de segundos que la macro espera a que pulses el botón Aceptar para cerrar el cuadro de diálogo. Si transcurren esos segundos sin cerrarlo manualmente, entonces la macro cierra por ti el cuadro de diálogo. Para mí, 6 segundos es un tiempo suficiente; pero si necesitas más tiempo, aumenta ese valor a 10 o a 15, a tu gusto o borra ese último parámetro.

Unas palabras antes de la 2.ª macro

Como ya comenté, la línea 13 de la anterior macro borra los retornos simplemente para tratarlos igual que Word y, por tanto, para igualar el recuento de caracteres de Word.

Ahora bien, me parece más lógico convertir los retornos en espacios para así contarlos como espacios. De esta forma, el recuento diferirá del de Word, pero se asemejará al recuento de Excel o al que te da Twitter con su famosa limitación de caracteres por tuit.

De todas formas, ten en cuenta:

1. que cada retorno son en realidad dos caracteres;
2. que las diferencias de recuento entre esta macro y la de cualquier herramienta serán muy pequeñas.

En algún punto hay que parar y decidirse, porque hay una indefinición de qué es un carácter. Trados Studio, por ejemplo, sí cuenta 2 caracteres por cada retorno, como se aprecia en este segmento que solo tiene un retorno:

2.ª macro para contar caracteres con AutoHotkey

Con esto dicho, la macro que da un recuento más apropiado según mi criterio será:

; -----------------------------------------------------------------
; 2.ª macro para contar caracteres en AutoHotkey (con/sin espacios)
; www.gonduana.com/contar-caracteres-con-autohotkey
; -----------------------------------------------------------------
; WIN + ALT + R
retorno := "`r`n"
#!r::		
	Clipboard=
	SendInput, ^c
	ClipWait, 0

	cadena := Clipboard
	cadena := StrReplace(cadena, retorno, A_SPACE)
	cadena := StrReplace(cadena, A_Tab, A_SPACE)
	caracteres := StrLen(cadena)

	StrReplace(cadena, A_SPACE,, espacios)
	caracteresSinEspacios := caracteres - espacios
	
	MsgBox 0, Recuento de caracteres, %caracteresSinEspacios% caracteres SIN espacios %retorno%%caracteres% caracteres CON espacios, 6
return

Explicación de la 2.ª macro

La única diferencia es la línea 13 resaltada, en la que se buscan los retornos (variable retorno) y se sustituyen por espacios (variable A_SPACE de AutoHotkey).

También te la puedes descargar desde aquí:

¿Cambiarías algo de la macro?

Por ejemplo, antes de contar los caracteres, podrías añadir una línea al principio para seleccionar todo el texto, así te evitas un paso.

Para ello, solo tendrías que insertar esta línea 11, justo antes de la línea 12:

SendInput, ^a

O quizás:

SendInput, ^e

Ten en cuenta que, en función de la aplicación, el atajo de teclado para seleccionar todo el texto será CONTROL+A o CONTROL+E.

Conclusiones

Ya hemos visto la macro para contar caracteres del texto seleccionado.

Es muy rápida, solo hay que acordarse del atajo de teclado que la ejecuta.

Tienes dos versiones, cada una trata los caracteres de retorno de una forma diferente. Pero tú puedes personalizar tu macro para que cuente los caracteres de la forma que tú quieres.

Por supuesto, queda prometido un artículo para contar las palabras de un documento.

⁂

¿Te lo vas a perder? Si no te lo quieres perder, suscríbete al boletín del blog, o sígueme en LinkedIn, Facebook o Twitter (@jssprt). De esta manera, serás el primero en enterarte de la publicación de los artículos.