QUOTE:
¿Sabéis cómo preguntar desde VBA a un documento Word si contiene cierta subcadena (la marca) o no lo hace?
A esto, me contesto yo solo: pues cuando llamas al método Execute de un objeto de tipo Find, el método devuelve un valor lógico diciendo si la búsqueda ha tenido éxito (VERDADERO) o ha sido infructuosa (FALSO). Y también hay una propiedad Found donde se guarda si la búsqueda ha sido exitosa o no, pero vaya, una solución para lo que yo quería es ésta:
| Código: |
If wordDoc.Content.Find.Execute(FindText:=labelToBeReplaced) Then...
|
Para hilar fino, lo que hago en cada pregunta es utilizar un objeto Find asociado a un objeto Range (en este caso, wordDoc.Content) que creo "al vuelo" con todo el contenido del documento wordDoc (bueno, encabezados y pies de página parece que no). Si utilizara el objeto Find asociado a appWord.Selection, podría tener problemas "de memoria", esto es, que me contestara que algo no se encuentra (aun estando en el documento) porque lo último que buscó lo encontró más adelante de donde se halla lo que busca ahora y, por defecto, la búsqueda la está haciendo hacia adelante y sin "wrapping". En fin, un detalle un poco molesto relacionado con que el objeto se acuerde de por dónde se quedó la última vez que buscó...
Hala, me voy a pegar patadas a un balón
Yo, no mi Mii
Bye!
Fede
