Discussion :

[ludovicparis]

Bonjour à tous,

Je travail sous access depuis peu de temps et malgré tous les problèmes que j'ai pu résoudre grâce au FAQ il me reste quelques problèmes sur lequels je bloque.

Dans le formulaire, j'ai créer une zone de saisie pour que l'utilisateur de la base entre une longueur de cable, et j'ai aussi créer 2 boutons d'option pour choisir entre m et cm cependant j'aimerais que si la personne entre une valeur en dessous de 30 et coche cm cela affiche une message d'erreur du style "impossible de choisir une longueur de cable inférieure à 30 cm".

J'ai un autre problème, j'ai créer une zone de liste modifiable liée a une table nommé cable avec une colonne liée qui renvoie à une reférence et qui permet de calculer un prix. J'aimerais que dans cette zone de liste modifiable apparaisse la deuxième colonne de ma table qui est la description du cable, cette colonne serait uniquement présente à titre indicatif.

J'aimerais donc savoir comment procéder procéder pour faire tout cela

Merci

[loufab]

Bonjour,

Vu que la valeur à tester est issue de 2 champs différents il te faut passer par un controle de cohérence via VBA.

Utilise l'événement Après MAJ de chaque champs (longueur et unité) pour le faire.

un algo du type.

Code :

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

1
2
3
4
5
 
If me.unité = "cm" and me.longueur <= 30 then
      msgbox "attention longueur trop petite"
      .... traitement
endif

Cordialement,

[zoom61]

Salut,

J'ai un autre problème, j'ai créer une zone de liste modifiable liée a une table nommé cable avec une colonne liée qui renvoie à une reférence et qui permet de calculer un prix. J'aimerais que dans cette zone de liste modifiable apparaisse la deuxième colonne de ma table qui est la description du cable, cette colonne serait uniquement présente à titre indicatif.

Normalement quand tu crées ta liste déroulante, tu as le choix du nombre de colonne, et ensuite tu choissis la largeur de te colonne, il te suffit de mettre 0 pour cette qui renvoie la référence et de mettre tout le reste pour la colonne indicative.

@+.

[ludovicparis]

Bonjour,

Merci pour vos réponses qui m'ont aidé mais cependant il reste un problème que je n'arrive pas à résoudre. Le message d'erreur apparaît bien quand j'ai entrer 30 mais je n'arrive pas à demander la distinction entre cm et m.

Voici ce que j'ai fait dans vba.

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
18
19
20
21
22
23
24
 
Public Sub Unité_AfterUpdate()
 
"Unité est le groupe d'option composé d'un bouton d'option centimètre et d'un bouton d'option mètre"
 
If Longueur < 30 And Option12 ??? (Je ne sais pas quoi entrer pour dire : option12 ativé) Then
 
MsgBox "Attention, la longueur saisie ne doit pas être inférieur à 30 cm"
 
Else
Harnais.Visible = True
 
Prix1.Visible = True
Prix2.Visible = True
Prix3.Visible = True
Prix4.Visible = True
Prix5.Visible = True
Prix6.Visible = True
Prix7.Visible = True
Prix8.Visible = True
 
End If
 
End Sub

C'est sans doute quelque chose de base mais étant débutant j'ai tout de même des difficultés.

Merci

[loufab]

Bonjour,

Dans le cas ou le bouton du cadre d'option cm est égal à 1 mettre ce code.

Code :

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

If Longueur < 30 And me.Option12= 1 then

Sinon donner le chiffre correspondant.

Cordialement