Discussion :

[gripoil]

Bonjour,

je n'arrive pas à modifier, via VBA, la source d'un état.

Mon code :

Code :

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

Reports!["rpt Historique"].RecordSource = "Historique"

rpt Historique est le nom de mon état.
Historique es tle nom de ma requête.

Access 2002 me renvoie une erreur 2451
"Nom d'état mal orthographie ou inexistant..", ce qui n'est pas le cas

Une piste ?

Merci

[cafeine]

Hello,

ton état est-il ouvert ?
si oui en quel mode ? (conception ou autre ?)

Sinon je te conseille plutôt de fixer une requête liée à ton état et de modifier dynamiquement le SQL de ta requête.

[Lou Pitchoun]

Salut,
et si tu enlèves les guillemets ??

Code :

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

Reports![rpt Historique].RecordSource = "Historique"

[gripoil]

Merci pour vos réponses.

Kikof => j'ai mal recopié mon code.

le bon code :

Code :

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

Reports![rpt Historique].RecordSource = "Historique"

Caféine => mon état est fermé. Ce code est lancé depuis un formulaire : dans un premier temps, j'affecte la source à mon état, l'erreur apparaît ici


et ensuite je l'imprime via Openreport.

[Lou Pitchoun]

Il faut l'ouvrir en mode création, modifier la source, fermer et hop...

Code :

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

1
2
3
    DoCmd.OpenReport "NomEtat", acViewDesign, acReadOnly
    Reports("NomEtat").RecordSource = "Commune"
    DoCmd.Close acReport, "NonEtat", acSaveYes

Et ça marche....
Dire que la semaine dernière j'ai cherché cette soluce et que je l'ai pas trouvé...

[Tofalu]

Il faut l'ouvrir en mode création, modifier la source, fermer et hop...

Code :

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

1
2
3
    DoCmd.OpenReport "NomEtat", acViewDesign, acReadOnly
    Reports("NomEtat").RecordSource = "Commune"
    DoCmd.Close acReport, "NonEtat", acSaveYes

Et ça marche....
Dire que la semaine dernière j'ai cherché cette soluce et que je l'ai pas trouvé...

Elle figure pourtant ici :

http://access.developpez.com/sources...EtatFormulaire

Cas numéro 4 si je ne m'abuse

[gripoil]

Pas très pratique...

Ok, merci !

[Lou Pitchoun]

Il faut l'ouvrir en mode création, modifier la source, fermer et hop...

Code :

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

1
2
3
    DoCmd.OpenReport "NomEtat", acViewDesign, acReadOnly
    Reports("NomEtat").RecordSource = "Commune"
    DoCmd.Close acReport, "NonEtat", acSaveYes

Et ça marche....
Dire que la semaine dernière j'ai cherché cette soluce et que je l'ai pas trouvé...

Elle figure pourtant ici :

http://access.developpez.com/sources...EtatFormulaire

Cas numéro 4 si je ne m'abuse

C'est passé à la trappe... . De toute façon mon pb n'est pas complètement résolu vu que l'état que je modifie appartient à une autre bdd...
Merci de m'avoir fait remarquer que c'était dans les sources...

[gripoil]

Bon, je viens de modifier mon code comme ceci :

Code :

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

1
2
3
 DoCmd.OpenReport "rpt Historique", acViewDesign, acHidden
 Reports("rpt Historique").RecordSource = "Historique"
 DoCmd.Close acReport, "rpt Historique", acSaveYes

Je suis sous Access 2000.

L'option acHidden n'est pas documentée et à priori ne fonctionne pas (je vois l'état en mode création...)

L'option acSaveYes ne joue pas non plus son rôle et une boîte de dialogue me demande si je souhaite enregistrer les modifications.

Je coince...

[cafeine]

reste la solution de modifier par le code le SQL de la requête sous jacente de ton état ...
Solution, selon moi, plus rapide et plus élégante ...