Discussion :

[typouce]

Bonjour,

Lors de l'importation de nouvelles données dans ma base Access, je souhaite que l'utilisateur soit invité à saisir les donnée manquantes dans ma table "Donneur d'ordre" dans le cas où un nouveau client est détecté.

Pour détecter si il y a un nouveau client, j'ai créé la requête suivante qui compare les données importées avec la table client :

Code SQL :

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

1
2
3
4
SELECT OTD.[Donneur d'ordre], OTD.[Nom du réceptionnaire], [Donneur d'ordre].Regroupement
FROM [Donneur d'ordre] RIGHT JOIN OTD ON [Donneur d'ordre].[Donneur d'ordre] = OTD.[Donneur d'ordre]
GROUP BY OTD.[Donneur d'ordre], OTD.[Nom du réceptionnaire], [Donneur d'ordre].Regroupement
HAVING ((([Donneur d'ordre].Regroupement) Is Null));

Par contre, par la suite je souhaiterai qu'une fenêtre apparaisse à l'écran invitant l'utilisateur à saisir les données adéquate pour renseigner la table client avec des données qui ne sont pas présentes dans les données importées (ex : fenêtre de livraison).

Avez-vous une solution ?

Est-ce possible en utilisant une requête paramétrée du type :

Code SQL :

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

1
2
3
4
5
PARAMETERS [Nom du client] Text ( 255 ), [Fenêtre inférieur] Short, [Fenêtre supérieur] Short;
INSERT INTO [Donneur d'ordre] ( [Donneur d'ordre], Client, Regroupement, Avance, Retard )
SELECT [01_maj_table_donneur_d'ordre].[Donneur d'ordre], [01_maj_table_donneur_d'ordre].[Nom du réceptionnaire], [01_maj_table_donneur_d'ordre].Regroupement, [Fenêtre inférieur] AS Expr2, [Fenêtre supérieur] AS Expr3
FROM [01_maj_table_donneur_d'ordre]
WHERE ((([01_maj_table_donneur_d'ordre].Regroupement)=[Nom du client]));

Merci par avance.

[loufab]

Bonjour,
Il faut utiliser des formulaires pour la saisie, tu peux éventuellement te passer d'une messagebox pour indiquer qu'il manque des infos si tu l'indiques dans le formulaire.
Pour enchainer le tout il va te falloir un peu de code VBA.

Cordialement,

[typouce]

Bonjour,

Existe-t-il des tutos ?

Cordialement.

[loufab]

Bonjour,
Les tutos traitent le plus souvent de cas générique. Je ne pense pas que ça existe pour ton cas spécifique.

Une solution toute simple :
Tu ouvres un formulaire de saisie avec comme source les enregistrements à traiter, à la charge de l'utilisateur de se déplacer d'une fiche à l'autre. Tu peux sanctionner la fermeture de ce dernier par un test de présence d'enregistrements non traités.
Pour ouvrir un formulaire :

Code :

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

docmd.openform

Pour sanctionner la fermeture il faut mettre un peu de code sur l'évènement d'un bouton fermer du formulaire :

Code :

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

1
2
3
4
5
6
 
if not isnull(dlookup("champ","requete","idclient=null") then
     msgbox "il reste des enregsitrements à traiter !",vbokonly
else
     docmd.close
endif

Il y a un tuto sur dlookup.

Cordialement,