Bonjour jean

tu lances directement cette version modifiée

pour le repertoire, il te suffit d'adapter la variable chemin_eml avec le nom du repertoire contenant ta collection de fichiers eml

sub traite_eml()

    dim prop(0) as new com.sun.star.beans.PropertyValue
    prop(0).name = "FilterName"
    prop(0).value = "Text"

    doc = thisComponent

    cherche = array("=E9", "=E0" ,"=9C" , "=E8" , "=F4" )
    remplace= array ("é","à","œ", "é", "ô")

    for i=lbound(cherche) to ubound(cherche)
        call rechercheRemplace(doc, cherche(i), remplace(i))
    next i


end sub

---------------------------------------------------------------------
To unsubscribe, e-mail: prog-unsubscr...@fr.openoffice.org
For additional commands, e-mail: prog-h...@fr.openoffice.org

Répondre à