OVH Cloud OVH Cloud

Code pour générer un field automatique ...

1 réponse
Avatar
Sujet : Génération d'un champ (field ) automatiquement en fonction de deux
autres champs(fields) lorsqu'ils sont entré dans un forumalire

Salutation,

Je suis à la recherche d'une aide de votre part. J'aimerai, tout d'abord,
vous remercier d'avance pour votre bien veillance à mon égard.
Pour résumé, la faiblesse qui me fait venir à vous est ma lacune à utiliser
des codes taches qui ne sont pas accessible depuis un menu utilisateur
simple (GUI).

j'utilise une base de donnée d'extension "mdb" avec MS Access.

Je souhaite qu'un champ "field" de ma table "personnel" soit automatiquement
générer en fonction de deux autres paramètres de cette même table. Mais je
n'arrive pas à implemanter cette opération dans le code de mon formulaire
( VBA ).

L'horrible face de ce code vous choquera moins si j'annonce dès maintenant
l'inexistance de familiarité que j'ai avec ce language.
Quoi qu'il en soit, voici ce que j'avais tenter d'assembler

Private Sub fonction_matricule(X)
Set rs = CurrentDb.OpenRecordset(chSQL)
If rs.isnull(Fields("dateE_P").Value)= false And
isnull(rs.Fields("dateE_P").Value)=false Then
rs.Fields(Matricule_P).Value = rs.Fields(iD).Value
End If
End Sub

L'objectif que j'ai tenté de donner à ce code est de vérifier que les deux
autres "fields" existent, ceci vérifié, de génerer le 3ième field et,
j'espèrais le voir alteré en mes espérances dans ma table personnel.

details:
Table : "personnel"
form : " G d P"
\_ iD : définit dans SQL STATEMENT BUILDER de mon formulaire => id:
(Year([DateE_P]) & Format([dateN_P];"ddmm"))
\_ fields : dateE_P & dateN_P & matricule_P

Bien à vous,
M.B.

1 réponse

Avatar
Raymond [mvp]
Bonjour.

oublions toute la prose que tu as envoyée.
dans une table , sauf exception exceptionnelle comme on dit, on ne génére
pas de nouveaux champs et surtout pas d'après d'autres champs.
ta table doit avoir tous ses champs et doivent contenir une certaine valeur
en fonction de leur définition de structure.
Veux-tu parler de calculer la valeur d'un champ par rapport à la valeur de
deux autres champs, tous ces champs étant présents dans la table. il est
possible que certains champs n'est pas encore de valeur définie mais ça
c'est un autre problème qui sera résolu par le programme.
est-ce bien celoa que tu veux ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


<j> a écrit dans le message de news:

Sujet : Génération d'un champ (field ) automatiquement en fonction de deux
autres champs(fields) lorsqu'ils sont entré dans un forumalire

Salutation,

Je suis à la recherche d'une aide de votre part. J'aimerai, tout d'abord,
vous remercier d'avance pour votre bien veillance à mon égard.
Pour résumé, la faiblesse qui me fait venir à vous est ma lacune à
utiliser des codes taches qui ne sont pas accessible depuis un menu
utilisateur simple (GUI).

j'utilise une base de donnée d'extension "mdb" avec MS Access.

Je souhaite qu'un champ "field" de ma table "personnel" soit
automatiquement générer en fonction de deux autres paramètres de cette
même table. Mais je n'arrive pas à implemanter cette opération dans le
code de mon formulaire ( VBA ).

L'horrible face de ce code vous choquera moins si j'annonce dès maintenant
l'inexistance de familiarité que j'ai avec ce language.
Quoi qu'il en soit, voici ce que j'avais tenter d'assembler

Private Sub fonction_matricule(X)
Set rs = CurrentDb.OpenRecordset(chSQL)
If rs.isnull(Fields("dateE_P").Value)= false And
isnull(rs.Fields("dateE_P").Value)úlse Then
rs.Fields(Matricule_P).Value = rs.Fields(iD).Value
End If
End Sub

L'objectif que j'ai tenté de donner à ce code est de vérifier que les deux
autres "fields" existent, ceci vérifié, de génerer le 3ième field et,
j'espèrais le voir alteré en mes espérances dans ma table personnel.

details:
Table : "personnel"
form : " G d P"
_ iD : définit dans SQL STATEMENT BUILDER de mon formulaire => id:
(Year([DateE_P]) & Format([dateN_P];"ddmm"))
_ fields : dateE_P & dateN_P & matricule_P

Bien à vous,
M.B.