Bernard Marcelly a écrit :
Re,
Mauvaise utilisation de l'énumération, à mon avis.
Au mien aussi , mais un message d'erreur plus explicite serait le bien venu ;-)
Il faudrait plutôt Dim unChamp As Object 1 do while enuChamps.hasMoreElements 2 unChamp = enuchamps.nextElement() 3 for i = LBound(oValeurs()) to UBound(oValeurs()) 4 unChamp.Content = oValeurs(i).text 5 next 6 loop
Bernard
Ca ne semble pas marcher ...
D'après ce que j'ai pu trouver (macro publipostage, essentiellement) et vos conseils, j'ai fait ceci :
oChamps = oPageFin.getTextFieldMasters() enuChamps = oPageFin.getTextFields() champsList = enuChamps.createEnumeration()
do while champsList.hasMoreElements unChamp = champsList.nextElement() for i = LBound(oValeurs()) to UBound(oValeurs()) unChamp.Content = oValeurs(i).text next loop
Ca ne marche pas, mais surtout je trouve qu'il est particulièrement confus de chercher les champs du documents cible. J'ai l'impression qu'il y différent moyens de communiquer avec les champs selon qu'il proviennent d'une bdd ou que ce sont des champs utilisateurs.
En outre, je trouve curieux que la variable un champs ne possède pas de propriétés plus directement exploitable.
Merci, Serge
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]