Discussion :

[noob77]

Bonjour,

Cela fait un petit moment déjà que je cherche à savoir comment faire pour
lister les éléments d'un champ à l'aide d'une formule. Sans grand résultat...

J'ai un champ "Type Code" qui contient plusieurs éléments (A, B, C...). Je
voudrais pouvoir les lister à l'aide d'une formule et pouvoir me servir de cette
formule dans un fichier texte.

Le problème est que ma formule ne permet d'afficher que le premier élément
et la fonction next(champ) que j'utilise ne permet d'avoir que le deuxième
élément (et on ne peut bien sûr pas faire un next(next(champ)).

Est-il possible de résoudre ce problème?

Merci d'avance pour vos réponses.

[luc_chivas]

Bonjour,

Cela fait un petit moment déjà que je cherche à savoir comment faire pour
lister les éléments d'un champ à l'aide d'une formule. Sans grand résultat...

J'ai un champ "Type Code" qui contient plusieurs éléments (A, B, C...). Je
voudrais pouvoir les lister à l'aide d'une formule et pouvoir me servir de cette
formule dans un fichier texte.

Le problème est que ma formule ne permet d'afficher que le premier élément
et la fonction next(champ) que j'utilise ne permet d'avoir que le deuxième
élément (et on ne peut bien sûr pas faire un next(next(champ)).

Est-il possible de résoudre ce problème?

Merci d'avance pour vos réponses.

un sous rapport ???

[noob77]

Non justement, pas avec un sous rapport. J'aimerai mettre le résultat de ma formule dans un texte pour que la zone se redimenssionne automatiquement si le résultat fait plus d'une ligne.
Je sais qu'on peut le faire avec un sous rapport mais cela ne déplacera pas le texte qu'il y a en dessous. De plus j'ai aussi du texte à côté...
Je ne sais pas quoi faire.

[luc_chivas]

Non justement, pas avec un sous rapport. J'aimerai mettre le résultat de ma formule dans un texte pour que la zone se redimenssionne automatiquement si le résultat fait plus d'une ligne.
Je sais qu'on peut le faire avec un sous rapport mais cela ne déplacera pas le texte qu'il y a en dessous. De plus j'ai aussi du texte à côté...
Je ne sais pas quoi faire.

si tu mets ton sous rapport dans une section bien à lui, cela déplacera le texte en dessous.

[navis84]

Bonjour,

En syntaxe Basic, dans ta formule :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim Tab
Tab = Split (<nom_du_champ>, ";")
formula = JOIN(Tab, chr(10))

En espérant que cela puisse t'aider,
@+
navis84

[noob77]

Bien tenté ^^ mais cette formule ne me renvoit que le premier élément de mon champ. Es-tu sûr du caractère pour le Split ?

[navis84]

Cela dépend du caractère séparateur dans ton champ. Peux-tu donner une valeur exemple de ton champ ?

[noob77]

Ma base de données est de type excel...
Je peux t'envoyer mes fichiers sources si tu veux voir ça de plus prêt.

Voilà, merci ^^

[luc_chivas]

Bonjour,

En syntaxe Basic, dans ta formule :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim Tab
Tab = Split (<nom_du_champ>, ";")
formula = JOIN(Tab, chr(10))

En espérant que cela puisse t'aider,
@+
navis84

Bonjour,

Le Join et le Split ne permette que de décomposer un champs pour le mettre dans un tableau en indiquant un délimiteur. Dans le cas présent, les enregistrements sont bien dans des enregistrements différents, donc le Split fonctionnera uniquement sur une valeur.

Il te faut récupérer tes valeurs comme d'habitude quand tu remplis un tableau.

Dans l'entête de ton rapport

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

NumberVar Index:=0

Dans le champs Détail de ton rapport

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Numbervar Index;
Shared StringVar array Tab;
Index :=Index +1;
Redim Preserve Tab[Index];
Tab[Index]:= (<nom_du_champ>;
" "

Après cela, tu aura toutes tes valeurs dans un tableau nommé Tab.

tu peux ensuite dans ton rapport principal, utiliser effectivement la commande Join pour tout mettre dans une variable, ou utiliser ton tableau Tab en adressant l'index.

en premier récupère la taille de ton tableau.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

NumberVar Taille:=ubound(Tab)

là, maintenant tu as la taille maximum de ton tableau, cela t'évitera de taper à coté....

[noob77]

Tu as essayé ce code avec les fichiers que je t'avais donné et ça marche?
Parce que là quand j'affiche la taille du tableau à la fin du code cela m'indique 1...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Tab[INDEX]:= (<nom_du_champ>;
" "

Je ne comprend pas tellement cette ligne là dans le code.
L'idée de pouvoir mettre les éléments de mon champ dans un tableau est séduisante mais ça ne marche pas.
Je ne vois pas où tu précises au champ de passer à l'élément suivant pour le mettre dans le tableau.

Merci.

[noob77]

Ok ça marche ^^
Merci beaucoup!