[VBA] table numéroauto

Version imprimable

02/12/2006, 22h23
BaRonm3

[VBA] table numéroauto

Bonsoir,

J'ai donc un formulaire1 indépendant liés à l'aide d'un contrôle à un formulaire2 qui affiche les données de ma table. Dans cette table, j'ai un champ "ID" avec comme type de données "NuméroAuto".

Je souhaiterais donc, une fois le nom d'une personne sélectionné dans le formulaire1 (à l'aide d'une liste modifiable),que lorsque j'appui sur le contrôle qui ouvre le formulaire2, le formulaire2 ce place au même enregistrement que celui du formulaire1. Pour cela j'utilise :

Code:

DoCmd.GoToRecord acDataForm, "Carte", acGoTo, Me.ID.Value

La valeur du numéro ID est extraite dans le formulaire1 à partir de la table en fonction du nom sélectionné.

Le probléme est que si je supprime un enregistrement de la table, il y aura un décalage entre le numéroauto et le nombre réel d'enregistrement. Donc la fonction que j'utilise ne fonctionne plus, elle ce placera 1 enregistrement plus loin..

Ce qui serait l'idéal c'est d'avoir un champ ID sans décallage de numéro, ou reussir a extraire dans le formulaire1 le numéro de l'enregistrement en fonction du nom sélectionné.

En espérant que vous avez compris mon probléme....
02/12/2006, 22h34
Faw

Salut, utilise plutôt Docmd.Openform + la clause where
http://access.developpez.com/faq/?page=Forms#PassValeur
02/12/2006, 22h36
BaRonm3

ok, merci de ton aide je vais essayer
02/12/2006, 22h57
BaRonm3

J'ai essayé avec les aides données dans la faq, j'ai pas réussi a les aplliquer... Mais j'ai regardé dans l'aide d'access et j'ai écrit :

Code:

DoCmd.OpenForm "Carte", acNormal, , "Nom = 'modifiable1'"

Le probléme c'est que sa ouvre le formulaire et à côté de la barre de défilement y a marqué filtré, mais sa ne m'affiche pas les données pour la personne en question. Si j'écrit :

Code:

DoCmd.OpenForm "Carte", acNormal, , "Nom = modifiable1"

avant d'ouvrir le formulaire, y m'ouvre une petite fenêtre pour me demander la valeur de modifiable1, si j'écrit le nom d'une personne de la table, une fois le formulaire ouvert c'est bon. Ce serait bien de ne pas avoir a écrire le nom...

Donc je pense que le probléme est assez simple, mais pour ma part je trouve pas encore la solution, si quelqu'un a une solution...
02/12/2006, 23h21
Faw

Bon, d'abord tu n'as pas bien regardé la syntaxe de la faq

Code:

"[nom_champ] =" & Forms![nom_formulaire]![nom_contrôle dans autre formulaire]

ce qui chez toi devrait donner

Code:

DoCmd.OpenForm "Carte", acNormal, , "Nom =" & Forms![Form1]!modifiable1

Deusio, tu veux accéder à un enregistrement par son ID mais tu utilises
Le NOM à priori...Où récupères-tu l'ID?
02/12/2006, 23h39
BaRonm3

J'ai essayé avec :

Code:

DoCmd.OpenForm "Carte", acNormal, , "Nom =" & Forms![Menu]!modifiable1

Avec cette ligne de commande, y me demande maintenant la valeur pour la personne sélectionné...

Ben a la base mon idée était de créer un champ ID (numéroauto) qui correspond enfaite au nombre d'enregistremnt de la table , puis l'extraire dans le formulaire1, pour cela j'utilise :

Code:

Me.id = modifiable1.Column(0)

J'obtient donc l'ID en fonction de la personne sélectionné, puis ouvrir l'autre formulaire avec:

Code:

DoCmd.GoToRecord acDataForm, "Carte", acGoTo, Me.ID.Value

Mais si je supprime un enregistrement de la table, et que je recrée un enregistrement il y aura un décallage du numéroauto par raport au nombre réel de'enregistrement.

Je te met la bd, si tu veux comprendre plus précisement mon probléme... (toutes les actions que je veux faire c quand tu clic sur "Mise a jour client")
03/12/2006, 04h17
Faw

Code:

DoCmd.OpenForm "Carte", acNormal, , "ID =" & Me.id

Enlève le filtre que tu as mis dans la propriété Filter du form "Carte"
chez moi ça fonctionne...
id est le contrôle indépendant du form "Menu".

Je vais regarder pourquoi ça ne fonctionne pas à priori avec la combobox...
03/12/2006, 11h25
BaRonm3

Un grand merci a toi Faw, et pour quelqu'un qui ne comprends rien à Access je trouve que sa va, continue à te soigner sa à l'air de fonctionner.

A bientôt.
03/12/2006, 23h51
Faw

Citation:

Envoyé par BaRonm3

Un grand merci a toi Faw, et pour quelqu'un qui ne comprends rien à Access je trouve que sa va, continue à te soigner sa à l'air de fonctionner.

A bientôt.

en ce moment, je me mettrais plutôt en "soins palliatifs" :aie:
Merci à toi mais je ne suis pas convaincu que tu n'ais pas d'autres problèmes
encore aucultés pour l'instant au regard de ta base...

en effet, comment se fait-il que ta liste déroulante renvoie toujours le
premier enregistrement en cas d'homonymie (test avec marius (oups c'était Maurice!)) alors que
la référence est l'ID?!!! en principe tu ne devrais pas avoir besoin de passer
par le contrôle "id" pour retourner le bon enregistrement....

Et pourquoi le contrôle id du form Menu a comme source contrôle "id" alors que
tu travailles avec un form et des contrôles indépendants?

j'ai un peu plus le temps demain, vé essayer d'y voir plus clair.

Suite...
Finalement c'est assez simple:
Tu mets la colonne liée = 1 et tu laisses les largeurs colonnes comme elles sont.
Et ton appel de form devient

Code:

DoCmd.OpenForm "Carte", acNormal, , "ID =" & Me.modifiable1