A voir également:
- Acscess saisie automatique
- Réponse automatique outlook - Guide
- Le fichier contient le nombre de voyageurs dans 3 gares. dans la cellule b5, saisissez une formule qui calcule le total et se met à jour si on change une valeur du tableau. quel total obtenez-vous ? quelle formule avez-vous saisie ? ✓ - Forum Excel
- Sommaire automatique word - Guide
- Message automatique thunderbird - Guide
- Test de recrutement opérateur de saisie ✓ - Forum Études / Formation High-Tech
2 réponses
random
Messages postés
1612
Date d'inscription
vendredi 26 novembre 2004
Statut
Membre
Dernière intervention
30 mars 2006
155
17 oct. 2005 à 11:31
17 oct. 2005 à 11:31
tu as un pb de conception
normalement tu as une table client avec les proprités clients
numéro nom adresse conditions de règlement
dans ta table ventes tu ne saisis que le numéro du client
par contre pour une saisie par formulaire
tu joins un sous formulaire qui te fait bapparaitre à partir de la
saisie du munméro les informations
normalement tu as une table client avec les proprités clients
numéro nom adresse conditions de règlement
dans ta table ventes tu ne saisis que le numéro du client
par contre pour une saisie par formulaire
tu joins un sous formulaire qui te fait bapparaitre à partir de la
saisie du munméro les informations
Bonjour,
Voici ma procédure favorite. Il reste à l'adapter à votre besoin.
A placer derrière une liste déroulante.
Private Sub NOM_A_CHERCHER_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[NUM_CLIENT] = " & Str(Me![NOM_A_CHERCHER])
Me.Bookmark = rs.Bookmark
End Sub
Cordialement
La science ne fait que trouver ce qui existe depuis toujours.
Hubert REEVES
Voici ma procédure favorite. Il reste à l'adapter à votre besoin.
A placer derrière une liste déroulante.
Private Sub NOM_A_CHERCHER_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[NUM_CLIENT] = " & Str(Me![NOM_A_CHERCHER])
Me.Bookmark = rs.Bookmark
End Sub
Cordialement
La science ne fait que trouver ce qui existe depuis toujours.
Hubert REEVES