[access vba] modifier une requete

Bon la ca y est j'ai compris je te remercie, je vais maintenant appliquer ceci aux autres parametres pour voir si j'ai assimile!!
Mon ultime petite question, c'est comment ca se fait qu'il manque certaine references dans le formulaire intermediaire "F_Selection" alors qu'elles sont toutes dans "Formulaire_Maintenance_Globale"?
En tout cas la c'est vraiment bon je crois que pour ce probleme, tu m'as montre la soluion merci beaucoup

Par contre dans ce que tu m'as envoye y a un pb avec le formulaire "tri_date" car il me lance un debogage quand j'essaie de le faire marcher avec une copie de la meme table; ce seriat cette ligne qui ne fonctionnerait pas:

Definition.SQL = ChaineSQL

dans:
Public Function ChangeRequeteDef(ChaineRequete As String, ChaineSQL As String) As Boolean

Dim Definition As Variant

If ((ChaineRequete = "") Or (ChaineSQL = "")) Then
ChangeRequeteDef = False
Else
Set Definition = CurrentDb.QueryDefs(ChaineRequete)
Definition.SQL = ChaineSQL
Definition.Close
RefreshDatabaseWindow
ChangeRequeteDef = True
End If

End Function
'

De plus comment as tu fait pour faire le F_Selction2?

De plus j'ai un petit probleme avec mon formulaire:
quand je met mes champs dans detail,(mode creation) je ne les voit pas en mode feuille de donnes et quand les met dans la partie pied de formulaire ils ne sont pas actifs!
( Ne t'inquietes pas normalement il ne me reste que cette partie a faire dans cette base, tu sera bientot tranquille!!!:-) )

Bonjour Lupin.A,

Je te remercie de ta precieuse aide car le resultat obtenu est celui que je cherchais et mon chef en est assez content, ca m'a aussi permis de voir de quoi access etait capable.

Cependant il y a une ultime question dont je n'ai pas encore de reponse:
J'aimerai choisir l'intervalle de dates a partir d'un autre formulaire donc j'ai fait un copier/coller des listes en modifiant le code lie et je n'arrive pas a afficher ma selection dans l'autre formulaire lie( le formulaire F_Selection)

Donc si jamais tu es encore la je crois qu'il ne me reste que ca comme pb a ce jour!

Bonjour Lupin.A

Je crois que je vais encore avoir besoin de tes lumieres!!
Parmi les mutiples choses que je t'avais demande auparavant, il y avait comment modifier les criteres d'une requete par un formulaire (en faisant un intervalle de dates), pour cela il n'ya plus de probleme et j'arrive meme a le transposer pour d'autres applications

En revanche j'aimerais maintenant ne pas choisir un intervalle de dates mais taper une date et en sortir les valeurs superieures.
Voila ce que j'ai tape comme code vba:

Option Compare Database
Sub Test()

'SELECT [Maintenance].[Refgarantie], [Maintenance].[Numlicence_cle], [Maintenance].[Fin_garantie], [Maintenance].[Fin_extension]
'FROM Maintenance
'WHERE ((([Maintenance].[Fin_garantie])>#1/1/2007# And ([Maintenance].[Fin_garantie])<#1/1/2008#));

Dim ChaineSQL As String, Critere1 As String

' Critere1 = "#1/1/2007#" ' Pourrait provenir de n'importe où, variable, textbox, etc ...

Critere1 = "#" & Me.Texte0 & "#"

DoCmd.Close acForm, "date_garantie"

ChaineSQL = "SELECT [Maintenance].[Refgarantie], [Maintenance].[Fin_garantie], "
ChaineSQL = ChaineSQL & " " & "FROM Maintenance "
ChaineSQL = ChaineSQL & "WHERE ((([Maintenance].[Fin_garantie])<=" & Critere1 & " "

If (ChangeRequeteDef("R_Validite_garantie2", ChaineSQL)) Then
DoCmd.OpenForm "Maintenance", acNormal, "", "[Fin_garantie]", , acNormal
End If


End Sub
'

Public Function ChangeRequeteDef(ChaineRequete As String, ChaineSQL As String) As Boolean

Dim Definition As Variant

If ((ChaineRequete = "") Or (ChaineSQL = "")) Then
ChangeRequeteDef = False
Else
Set Definition = CurrentDb.QueryDefs(ChaineRequete)
Definition.SQL = ChaineSQL
Definition.Close
RefreshDatabaseWindow
ChangeRequeteDef = True
End If

End Function
'

Private Sub Texte0_Change()

End Sub

Je pense qu'il y a des erreurs( puisque ca marche pas) et je voudrais savoir si tu as une solution miracle!
merci