bonjour à tous,
voilà mon souci actuel.
J ai un formulaire ds lequel j ai un tableau avec des valeurs numériques que j aimerais avoir sous forme graphique.
Mon problème est que que je voudrais une autre mise en forme du graphique ( car dans ce tableau , je n ai pas d'abscisse ) donc j ai crée une nouvelle table à 2 colonnes ( abscisse et ordonnées) vide au départ que je met à jour via le formulaire. voilà le code :
1) Pour que le graph se mette à jour dynamiquement à chaque changement de valeur dans le tableau, est ce que je dois mettre ce code dans form_current ou autre ( dois je crée une macro pour actualiser cette table)
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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55 Private Sub form_current() Dim dbs As DAO.Database Dim Rst As DAO.Recordset Set Rst = CurrentDb.OpenRecordset("graph1", dbOpenDynaset) With Rst If Rst.RecordCount = 0 Then Rst.AddNew Rst.Fields(0) = 1 Rst.Fields(1) = Me.DDM_bord_normal_ens1.Value Rst.Fields(2) = Me.Al_gauche_bord_ens1.Value Rst.Fields(3) = Me.Al_droite_bord_ens1.Value Rst.Update Rst.AddNew Rst.Fields(0) = -1 Rst.Fields(1) = Me.DDM_Mon_normal_ens1.Value Rst.Fields(2) = Me.Al_gauche_sol_ens1.Value Rst.Fields(3) = Me.Al_droite_sol_ens1.Value Rst.Update Else Rst.MoveFirst Rst.Fields(0) = 1 Rst.Fields(1) = Me.DDM_bord_normal_ens1.Value Rst.Fields(2) = Me.Al_gauche_bord_ens1.Value Rst.Fields(3) = Me.Al_droite_bord_ens1.Value Rst.MoveNext Rst.Fields(0) = -1 Rst.Fields(1) = Me.DDM_Mon_normal_ens1.Value Rst.Fields(2) = Me.Al_gauche_sol_ens1.Value Rst.Fields(3) = Me.Al_droite_sol_ens1.Value Rst.Close End If End With End Sub
2) en suite et c est le plus important j ai le message suivant quand je lance le formulaire :
" erreur d 'execution 3020. Update ou cancelupdate effectué sans appeler addnew ni edit '.
Et en plus mes valeurs dans ma table contiennent bien les bonnes valeurs lors du premier lancement du formulaire mais ne se mettent pas à jour quand je modifie ensuite le tableau du formulaire.
Kelkun aurait il une idée du pourquoi?
Thanks.
Sunwind
Partager