Sé que es posible seleccionar texto en función de su formato (con la función buscar / reemplazar), pero me gustaría hacerlo automáticamente, sin tener que ingresar manualmente la fuente, el color de la fuente, la cursiva, etc.
Así que estoy buscando una macro que recupere el formato de Heading 1
(su fuente, el color de fuente, el tamaño, si está en negrita / cursiva / subrayado). Luego, la macro buscaría en mi documento cualquier texto que coincida con este formato.
La macro debe seleccionar todos los párrafos con el Heading 1
estilo, pero también todos los demás párrafos con otros estilos pero con la misma fuente, color de fuente, tamaño y negrita / cursiva / subrayado como Heading 1
.
Style
objeto para el Título 1 usandoActiveDocument.Styles(wdStyleHeading1)
. Luego puede consultar sus propiedades. Por ejemploActiveDocument.Styles(wdStyleHeading1).Font.Bold
, devolverá True, False o wdUndefined.