Discussion :

[Gepy-Bdx]

Bonjour,

Je suis ce que l'on pourrais appelé un null en langage VBA pourtant il faut bien que je m'y mette car cela deviens tres bloquant.

Dans le cadre de mon activité professionnelle, je me suis fait une base de donnée pour suivre et traiter les demandes clients et a terme j'aimerais en sortir un plan de charge...

Ma problématique actuelle consiste a fixer le statut d'un enregistrement "Statut_Offre" en fonction de différentes situations de différents champs que j'ai tenter de vous expliquer dans le fichier exel joint Statuts_Enregistrements.xlsx

Sur la base du statut de chaque fiche j'envisage évidement de faire mes tris et mes requêtes... help me!!

merci à tous de vos retours

[ClaudeLELOUP]

Bonjour,

Regarde ici : http://warin.developpez.com/access/contraintes/

Je suis ce que l'on pourrait appeler un nul en langage VBA pourtant il faut bien que je m'y mette, car cela devient très bloquant.

Le VBA va te permettre de décupler tes possibilités. Ce n'est pas bien compliqué : juste du mauvais anglais...

Pour te mettre le pied à l'étrier : http://heureuxoli.developpez.com/office/word/vba-all/

[marot_r]

Bonjour.

Note que tu n'as pas obligatoirement besoin de VBA pour des assignations d'état.
Tu peux aussi utiliser des requêtes de mise à jour avec des champs calculés.

Pour décider en SQL tu as essentiellement iif(Condition; ValeurVrai; ValeurFausse). Tu as aussi Switch(Condition1; ValeurVraie1; Condition2; ValeurVraie2, ...).
On peut faire des iif() dans les iif() mais cela devient un peu mêlant quand on dépasse 2 niveaux.

En vba tu as :

Code :

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

if condition then actionVraie

Code :

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

1
2
3
if condition then 
     actionVraie
end if

Code :

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

1
2
3
4
5
if condition then 
     actionVraie
   else
     actionFausse
end if

Code :

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

1
2
3
4
5
6
7
if condition1 then 
      actionVraie1
elseif condition2 then
      actionVraie2
  else
      actionFausse2
end if

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
17
select case uneValeur
    case UneValeur '=UneValeur
        actionSiEgale
 
    case is >= UneValeur '>=UneValeur on peut aussi tester >
        actionSiSupéreureOuEgal
 
    case is <= UneValeur '<=UneValeur
        actionSiInferieuOuEgal
 
    case UneValeur1 to uneValeur2 'entre valeur1 et valeur2
         actionSiComprisEntre
 
    case else 'Tout autre cas
          actionAutre      
 
end select

Les valeurs peuvent être des constantes (ex : 4) ou des variables ou le résultat d'un calcul aussi bien dans le Select que dans les Case.
C'est très puissant pour représenter clairement des logiques complexes.

et tu as aussi iif() en VBA.

Attention dans un iif() les 2 termes valeurVraieet valeurFaussesont évaluées indépendamment de la valeur du test puis Access ne garde qu'une des 2 valeurs.
Cela peut être gênant si tes évaluations font aussi des modifications aux données (ce qu'on appelle un effet de bord, ce qui doit être manipuler TRÈS prudemment car cela peut surprendre l'humain qui lit ton code.).

A+

[Gepy-Bdx]

Merci! je vais pouvoir regarder çà de près... a pluche