Discussion :

[gillou13]

Bonjour à tous,

J'ai un rapport qui me renvoi un message d'erreur (en visu une parti du SQL) lors de l'actualisation des donnée.

le problème venai d'un obj de l'univers qui etait utilisé plusieurs fois et contenait beaucoup de CASE. donc utilisé tous seul il passe sans problème. avec les 40 autres obj sa plante.

Mais quand je veu ouvrir l'éditeur de requette, il me balance le même message d'erreur et ferme l'éditeur aussitôt.

comment je peu m'y prendre pour modifier cette requette sans avoir besoin de tous refaire le rapport?

Merci d'avance.

[TomDuBouchon]

Bonjour,

Tu as peut être moyen de retirer l'objet problématique en utilisant du VBA.
Tout d'abord, il faut identifier quel est le fournisseur de données, la requête et l'objet (leurs index) dans l'exemple que je vais donner, je pars du principe que c'est à chaque fois 1.

Ensuite, tu as une méthode qui te permet de retirer un objet d'une requête, mais malheureusement elle me génère une erreur. Je la poste quand même car là je n'ai plus le temps de regarder. Mais j'ai bon espoir que cela puisse quand même t'aider :

Code :

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

ThisDocument.DataProviders(1).Queries(1).Results.Remove(ThisDocument.DataProviders(1).Queries(1).Results(1).Class, ThisDocument.DataProviders(1).Queries(1).Results(1).Object)

[TomDuBouchon]

Bon ca y est ça fonctionne.

Donc, une fois ton rapport ouvert, ouvres une fenêtre VBA (Alt+F11). Ensuite, toujours en partant du principe que l'objet que tu veux supprimer fait partie du premier fournisseur de données, de la première requête de ce dernier, et qu'il s'agit du premier objet de cette dernière, colle le code suivant :

Code :

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

1
2
3
Sub Test()
    Call ThisDocument.DataProviders(1).Queries(1).Results.Remove(ThisDocument.DataProviders(1).Queries(1).Results(1).Class, ThisDocument.DataProviders(1).Queries(1).Results(1).Object)
End Sub

Il ne te reste plus qu'à exécuter ce code en cliquant sur le bouton "Lecture".