¿Cómo dibujar una línea horizontal en el texto especificado en el cuadro de texto de Word usando vb?

¿configuración? Obj=.Find.Execute("Reconocimiento manual")? No sé dónde quieres "identificar manualmente" las líneas horizontales de la caligrafía y la pintura.

obj. fuente. ¿Tachado? =?Real

Lo dibujo debajo o encima de la palabra, lo que se llama tachado. También puedo dibujar un tachado doble. ¿No puede ser este el caso?

Si eso no funciona, agregue una forma (línea) y luego ubíquela para el reconocimiento manual, lo cual es más problemático.