Changer l'affichage de la feuille de requête

sekoudiom Messages postés 29 Statut Membre -  
sekoudiom Messages postés 29 Statut Membre -
Bonjour,
Est-il possible de changer l'affichage d'une feuille de reqête dans accèss? l'affichage classique étant de type colonne,est-il possible de disposer les champs de façon verticale?
merci!
A voir également:

5 réponses

CaPiT Messages postés 622 Statut Membre 51
 
Bonsoir.

Oui, et pour se faire tu dois créer un Etat.

Aide toi de l'assistant c'est relativement simple.
0
sekoudiom Messages postés 29 Statut Membre 3
 
ok,mais est-il est possible de faire des états pour chaque enregistrement?
0
sthael_01 Messages postés 78 Statut Membre 7
 
par defintion, un champ contient un ou plusieurs enregistrement et un enregistrement
peut exister dans un ou +sieurs champs
ce qui fait que les colones representent les champs et les lignes des enregistrements
imagine le contraire comment veut tu organiser les enregistrements si les champs deviennent des lignes et les enregistrements des colonnes.
peut etre avec office 2007
jesprs que j'ai repondu à ta question
0
sekoudiom Messages postés 29 Statut Membre 3
 
mais j'ai une autre préoccupation,(en fait je suis un débutant en accèss).Eest-il possible d'entrer des critères dans une réquète et de les exécuter,tout cela à partir d'un formulaire? si oui,comment procéder?
merci
0
CaPiT Messages postés 622 Statut Membre 51
 
Oui, c'est possible ;)

Je t'explique la démarche:
- Tu crées un formulaire. Dans celui-ci tu mets une zone de liste déroulante que l'on va appeler ChoixListe (par exemple). Dans la propriété "contenu" de la liste, tu cliques sur les trois p'tits points (...). Dans la requête tu mets le champs qui te servira de critère dans la requête principale (par expl: Nom_client).

- Dans ce formulaire tu crées un bouton à l'aide de l'assistant. Dans "Divers" tu mets "Exécuter requête".

- Ensuite tu vas dans ta requête principale. Sur le champs ou tu souhaites mettre ce critère (Das mon exemple c'est le champs "nom_client"), tu mets [Formulaires]![NomDuFormulaire]![ChoixListe].

Ca devrais marché. Si tu as plusieurs critères tu mets plusieurs listes puis tu adaptes dans la requête principale.
0
sekoudiom Messages postés 29 Statut Membre 3
 
ok,je vais éssayer pour voir ce que ça peut me donner.
merci pour tout!
0
sekoudiom Messages postés 29 Statut Membre 3
 
ça y est,j'ai éssayé et ça marche! mais il me faudra encore quelques exercices pour bien maitriser les différents rouages.
pour le moment, j'ai reussi avec un seul champs. j'ai tenté de placer plusieurs critères, (c'est à dire définir plusieurs critères dans la même feuille de requête, et le tout pouvant s'exécuter à travers le même formulaire) mais ça n'a pas marché. Est-il possible?
encore une fois merci!
0
CaPiT Messages postés 622 Statut Membre 51
 
Dis moi si ça marche ;)

Bonne journée !
0
sekoudiom Messages postés 29 Statut Membre 3
 
ok, je vais éssayé ça, et j'espère que ça marchera.
merci, tu es très cool! à demain
0
sekoudiom Messages postés 29 Statut Membre 3
 
cette fois ci,ca ne marche pas,je ne me retrouve pas avec ces codes.en fait je suis encore debutant et je crois qu'il me faut quelques cours de VB. je te remercie pour tous les éforts que tu as consacré pour moi,mais il me faut encore des rudiments pour pouvoir avancer.sur quels sites pourais-je trouver des bons cours pour bien apprendre à développer?
bonne journée!
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
CaPiT Messages postés 622 Statut Membre 51
 
C'est possible évidement !

Dans ta requête principale tu rajoute un critère comme l'autre. La deuxieme liste se créer comme la 1ere.
Le code VBA de ton bouton d'execution devient plus compliqué par contre:

Private Sub bouton_Click()
    Dim stDocName As String
    Dim stLinkCriteria As String

If Not IsNull([Liste1) Or IsNull(Liste2) Then
    stDocName = "FormulaireMachin"
    
    Set db = CurrentDb()
    Set res = db.OpenRecordset("SELECT ChampsPrincipalTable FROM TableEnQuestion WHERE ((Champs1)='" & TableEnQuestion.Liste1 & "') AND ((TableEnQuestion.Champs2)='" & Liste2 & "');")

    stLinkCriteria = "ChampsPrincipalFormulaireMachin=" & res!ChampsPrincipalTable
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
    MsgBox ("Vous n'avez pas sélectionné de données dans les listes !!!!!!")
End If
End sub
0