Discussion :

[semur]

Bonjour à tous

J’ai quelques soucis avec access comme c mes début je patauge un peu

Je vous explique
J’ai une table : table1
J’ai 2 formulaires : form1et form2

Ds ma table 1
N°
Nom
Prenon

Ds form1 qui est un formulaire de recherche
Ex : je cherche le n° 10 et la mon form2 s’ouvre avec le nom et prénom correspondant

(Mon form2 étant base sur la table1)
Jusque la pas de soucis

Mais ds mon form 2 j’aimerai que l’utilisateur saisisse des remarques (champ indépendant) et que tout viennent alimenter une autre table (table2) qui aurait la tête suivante
N°
Nom
Prenon
Remarques

Sans que ma table1 soit alimenté par cette nlle donnée
Est qu’il est possible de faire je genre de truc ??
Faut-il faire une table intermédiaire

En espérant que mes explications sont claires

Si quelqu’un peut m’aider
Ce serait très sympa
Merci d’avance de votre aide

[argyronet]

Bonjour,

En toute sincérité, avoir une table intermédiaire juste pour mettre une remarque me semble superflu.
Autant ajouter un champ mémo et l'alimenter en temps réel...
Maintenant, si tu tiens à procéder ainsi, il te faut effectivement une autre table avec le N° et un champ Remarque. Une relation est alors établie entre les 2 tables.

Argy

[semur]

c'etait juste une question!!!

comment toi tu ferai car la je suis perdue

merci de ton aide

[argyronet]

comment toi tu ferai car la je suis perdue

Eh bien tu prends un formulaire, fondé sur ta table qui contient tes personnes avec tous les champs, y compris le champ Remarques.
Tu nommes ce formulaire frmPersonnes.
Tu créés un second formulaire nommé frmRecherche avec une liste déroulante, un bouton Rechercher et un bouton Annuler.
Tu cliques 2x sur la liste déroulante de manière à afficher ses propriétés et tu localises Contenu et tu y colles ce code (à adapater selon tes champs):

Code :

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

SELECT [TBLPersonnes].[N°], [Nom] & " " & [Prénom] AS NomComplet, [TBLPersonnes].[Nom] FROM TBLPersonnes ORDER BY [TBLPersonnes].[Nom];

Sur la propriété Largeur colonnes : 0cm;2,54cm;2,54cm
Sur la propriété Colonne liée : 1
Sur la propriété Largeur liste : 6

Ensuite, sur l'événement Click ()du bouton cmdRechercher, tu colles ce code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Private Sub cmdChercher_Click()
Dim strCriteria As String
Dim blnExiste As Boolean
 
  strCriteria = "[N°]=" & Me!cmbListNoms
  blnExiste = (DCount("[N°]", "TBLPersonnes", strCriteria)) > 0
  If blnExiste Then
    DoCmd.Close acForm, Me.Name
    DoCmd.OpenForm "frmPersonne", acNormal, , strCriteria, , acDialog
  End If
End Sub
 
Private Sub cmdAnnuler_Click()
  DoCmd.Close acForm, Me.Name
End Sub

Tu sauves, tu fermes frmPersonnes et tu testes.

Argy