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]



Répondre à