Imagen: iStock/Aleksei Morozov

Muchos de nosotros dependemos de las estadísticas de legibilidad para mejorar nuestra escritura o para escribir a una audiencia específica en Microsoft Word. Si la función está habilitada, verá una lista de estadísticas después de ejecutar el corrector ortográfico. Desafortunadamente, la revisión ortográfica es la única vez que verá estas estadísticas, lo que puede ser tedioso, especialmente si el documento es grande y complejo. Si cancela el corrector ortográfico, no verá las estadísticas. En este artículo, le mostraré algunos procedimientos de VBA que mostrarán estadísticas de tres maneras diferentes.

VER: 69 trucos de Excel que todo usuario debe dominar (República Tecnológica)

Uso Microsoft 365 en un sistema Windows 10 de 64 bits, pero puede usar versiones anteriores. La versión en línea no admite macros. Puede descargar los archivos de demostración .docx, .doc y .cls o usar la función =RAND() para crear algunos párrafos de texto e ingresar el código usted mismo. Este artículo asume que tiene habilidades básicas en Word, pero incluso un principiante debería poder navegar este artículo con éxito.

Índice
  • Cómo habilitar las estadísticas de legibilidad en Microsoft Word
  • Cómo ingresar y ejecutar código en Word
  • Cómo mostrar estadísticas de legibilidad una por una
  • Cómo mostrar estadísticas de legibilidad una por una
  • Cómo ver todas las estadísticas de legibilidad a la vez
  • Cómo habilitar las estadísticas de legibilidad en Microsoft Word

    Si no ve las estadísticas de legibilidad después de ejecutar el corrector ortográfico, la función no está habilitada. Para activarlo, haga lo siguiente:

    1. Haga clic en la pestaña Archivo y elija Opciones (o Más si Opciones no está visible).
    2. Elija Verificación en el panel izquierdo.
    3. En la sección Al corregir ortografía y gramática en Word, marque la opción Mostrar estadísticas de legibilidad, como se muestra en Figura A.

    Figura A

    Cómo ingresar y ejecutar código en Word

    Para ingresar el código, presione Alt+F11 para abrir Visual Basic Monitor. En el Explorador de proyectos de la izquierda, elija ThisWorkbook e ingrese el código. O importe el archivo .cls descargable. No pegue el código directamente desde esta página web. En su lugar, puede copiarlo en cualquier editor de texto y luego copiar el texto del editor de texto en un módulo. Si está utilizando una versión de cinta, debe guardar el archivo como un archivo habilitado para macros para usar las macros.

    VER: Windows 10: Listas de comandos de voz para reconocimiento de voz y dictado (PDF gratis) (República Tecnológica)

    En el VBE, puede presionar F5 para ejecutar un procedimiento, pero asegúrese de hacer clic dentro del procedimiento que desea ejecutar. En un documento de Word, haga clic en la pestaña Desarrollador, haga clic en Macros en el grupo Código, elija Procedimiento en el cuadro de diálogo resultante que se muestra en Figura Bluego haga clic en Ejecutar.

    Figura B

    Cómo mostrar estadísticas de legibilidad una por una

    La única forma de activar las estadísticas de legibilidad de Word a través de la interfaz es ejecutar un corrector ortográfico (F7). Si su documento es largo, puede perder algo de tiempo tratando de hojearlo. Si cancela el corrector ortográfico, Word lo regresa inmediatamente al documento, sin mostrar las estadísticas.

    El procedimiento corto Lista A mostrará todas las estadísticas, una por una. Es un poco tedioso si solo desea mostrar uno, pero puede ejecutarlo fuera de una tarea de revisión ortográfica.

    Lista A

    Bajo Legibilidad()

    'Explore las estadísticas de legibilidad y muéstrelas una por una en un cuadro de mensaje.

    Para cada rs en Selection.Range.ReadabilityStatistics

    MsgBox rs.Nombre & ”-” & rs.Valor

    Próximos

    Título final

    Ejecute la macro y verá un cuadro de mensaje similar al de Figura C. Debe presionar OK para ver la siguiente estadística, hay varias.

    Figura C

    El bucle For Each recorre la colección ReadabilityStatistics. El cuadro de mensaje muestra las propiedades Nombre y Valor concatenadas en el siguiente orden: Palabras, Caracteres, Párrafos, Oraciones, Oraciones por párrafo, Palabras por oración, Caracteres por palabra, Oraciones pasivas, Facilidad de lectura de Flesch, Nivel de grado de Flesch-Kincaid y Oraciones pasivas . No puede cambiar el orden en este sencillo procedimiento. Para ver estadísticas específicas, agregue una marca para este objeto.

    Cómo mostrar estadísticas de legibilidad una por una

    Desplazarse por todas las estadísticas una por una está bien, pero tal vez desee ver solo una estadística. En este caso, puede especificar este objeto estadístico como se muestra en Lista B. Este procedimiento muestra una sola estadística, el nivel de grado de Flesch-Kincaid, que tiene un valor de índice de 9. (Más sobre eso en un minuto). Figura D muestra el resultado de ejecutar este procedimiento.

    Lista B

    En ReadabilityGradeLevel()

    'Mostrar nivel de grado.

    Establecer rsRange = ActiveDocument.Content

    rs = rsRange.ReadabilityStatistics(9).Valor

    MsgBox "Nivel:" & rs

    Título final

    Figura D

    Es posible que haya notado que este procedimiento utiliza el valor de índice 9 para recuperar la estadística del nivel de grado. ¿Recuerdas el orden que mencioné y no puedes cambiarlo? Aquí es donde entran los valores de índice. Ver Tabla A para obtener una lista completa. Use valores de índice para mostrar valores estadísticos específicos.

    Tabla A

    Palabras

    0

    Personajes

    1

    Párrafos

    2

    Oraciones

    3

    Oraciones por párrafo

    4

    palabras por oración

    5

    Caracteres por palabra

    6

    oraciones pasivas

    siete

    Facilidad de lectura Flesch

    8

    Nivel de grado de Flesch-Kincaid

    9

    oraciones pasivas

    diez

    Hasta ahora, hemos visto dos procedimientos que devuelven estadísticas de legibilidad: uno las muestra todas una a la vez y el otro muestra solo una. Veamos un procedimiento que los muestra todos a la vez.

    Cómo ver todas las estadísticas de legibilidad a la vez

    Lo más probable es que desee ver todas las estadísticas en una pantalla eficiente. Lista C es eso Es básicamente lo mismo que Lista Apero esta vez el código crea una cadena larga que contiene todas las estadísticas y muestra esta cadena en una pantalla de cuadro de mensaje como se muestra en Figura E.

    Lista C

    En ReadabilityOneScreen()

    'Ver todas las estadísticas de legibilidad en una pantalla.

    Dim strStats como cadena

    'Restablecer la cadena a nada.

    strStats = ""

    'Escanea las estadísticas y crea un canal.

    Para cada rs en Selection.Range.ReadabilityStatistics

    strStats=strStats&rs.Nombre&":rs.Valor

    strStats = strStats & vbCrLf

    Próximos

    'Mostrar todas las estadísticas.

    MsgBox strStats, vbOKOnly, "Estadísticas de legibilidad"

    Título final

    Figura E

    ¡Puedes mostrarlos todos al mismo tiempo!

    Como está, ninguno de los procedimientos contiene manejo de errores, por lo que puede agregar código para cubrir posibles errores. Si usa estas estadísticas con frecuencia, además de la revisión ortográfica, es posible que desee agregar un grupo personalizado a la cinta y agregarle las macros de visualización de estadísticas adecuadas.