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
8 messages in org.openoffice.fr.progRe: [prog] "Le symbole a déjà reçue u...
