[VBA] BO Conditions de requetes avec VBA [Résolu]

[hlecleve]

Bonjour,

Je travaille avec BO version6.
Je souhaiterais par le biais d'une macro définir plusieurs conditions dans la requete de mon report.
J'essaie d'utiliser la fonction "Conditions.Add" mais j'ai une erreur "object doesn't exist".
Je vous donne la phrase de code :

Application.ActiveDocument.DataProviders(1).Queries(1).Conditions.Add "Entite", "codeentite", "equal to", "004"

Merci pour votre aide

[Sunchaser]

Bonsoir,

Juste une petite question:

Utilises-tu un Univers ou bien le 'mode' Free-Hand SQL ?
Parcequ'il semble que, dans le second cas, tu ne puisses travailler de la sorte les objets 'Condition'.

@+

Edit -> mais je peut me tromper, hein, j'chui po 'expert' en B.O encore ...

[hlecleve]

Désolé pour ma réponse tardive, beaucoup de boulot en ce moment.
J'utilise un univers pour faire ma requete.

En fait pour pofiner ma demande, l'idéal pour moi aurait été de pouvoir accèder à une invite de requete (changer les variables de l'invite et rafrachir automatiquement) , le tout par macro.
J'ai bien réussi à changer les variables mais je ne peux pas rafraichir automatiquement : il faut que je clique sur le bouton "ok" ce qui perd de son charme.
Du coup je me suis rabattu sur une autre option d'où mon message ...
Merci pour ton aide

[Sergio63]

Bonjour,

Je vois 2 solutions possibles à ton problème :

1) Avec VBA : tu n'utilises pas d'invite. Tu récupère tout et ensuite tu mets un filtre sur chaque valeur de la variable (avec une boucle) et tu exportes le résultat en PDF. Tu auras autant de PDF que de valeurs possibles.

2) La ligne de commande. dans ce cas tu auras plusieurs fichiers paramètres qui seront appelés successivement dans ton fichier de commande.

Dans les 2 cas tu n'as plus besoin d'intervenir pour changer les critères.

Cordialement

Sergio

[hlecleve]

Bonjour,

Merci pour cette réponse.
J'ai en fait trouvé la solution hier en utilisant la fonction @script dans Designer.
En effet, comme je l'explique au début de mon message la fonction "conditions.Add" n'a pas l'air de fonctionner.
Donc le procédé est le suivant :
Dans DESIGNER je crée une variable filtre_codesocieteavec une clause where "dbo.STR_Entite.Codesociete = (@Script('choixsociete', 'A', 'Mselection_criteres'))
ou "Mselection_criteres" est le nom de la macro à utiliser dans mon report et
"choixsociete" la variable défini dans la macro.
Ensuite dans REPORTER je crée une requete sans invite dans laquelle je prends l'objet "filtre_codesociete".
Ma macro "Mselection_criteres" ressemble à ça :
Application.Variables.Item("choixsociete").Value = "014"
ActiveDocument.Refresh
Il doit être possible ensuite de faire une boucle pour rafraichir chaque code société et ensuite enregistrer en pdf chaque état.
J'espère que cela aidera du monde.
Moi en tout cas ça va bien m'aider.