Discussion :

[pierre24]

Bonjour,
je viens de me remettre au vba ce matin... ca faisait belle lurette que j'en avais pas fait ! Bref...

Voici mon code, rien de très complexe :

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
 
 
Option Compare Database
 
Private Sub Report_Open(Cancel As Integer)
 
Dim bd As DAO.Database
Dim rst As DAO.Recordset
Dim req As String
Dim c As String
Set bd = CurrentDb
req = " SELECT CODEGEO FROM CODES_GEO ORDER BY CODEGEO "
Set rst = bd.OpenRecordset(req)
 
Dim REG As String
 
rst.MoveFirst
 
While Not rst.EOF
 
    regionrst = rst!CODEGEO
    region = MID(regionrst,0,2)
    REG = region 'Voici le champ de mon état qui devrait récupérer la donnée
                      'de mon recorset 
    rst.MoveNext
 
Wend
 
 
End Sub

En fait mon état ne récupere rien !

[6ril25]

Salut,

Code :

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

1
2
3
4
5
6
7
8
9
10
 
 
Dim REG As String
 
[...]
 
    regionrst = rst!CODEGEO
    region = MID(regionrst,0,2)
    REG = region 'Voici le champ de mon état qui devrait récupérer la donnée
                      'de mon recorset

C'est "region" ou "REG" qui est sur ton état?? parce que

Code :

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

REG = region

ca met la valeur de "region" dans "REG" (et "REG" est un variable privée, rien d'autre)

Pourquoi tu n'utilise pas la source de l'etat??

[pierre24]

C'est le champ REG qui est présent sur mon état.

Pourquoi tu n'utilise pas la source de l'etat??

CAD ?

[6ril25]

Si c'est REG qui est dans ton état, explique moi pourquoi:

Code :

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

Dim REG As String

Là, il s'agit d'une variable privée de "Report_Open"

[pierre24]

Donc je ne dois pas la déclarer ok.
Et donc je me retrouve avec l'erreur suivante sur :

Code :

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

REG = region

Erreur :

Impossible d'attribuer une valeur a cet objet

Y a t'il un parametre a rajouter dans mon code pour dire que REG appartient à l'Etat ( que c'est une zone de texte sur mon état ) ?

[6ril25]

tu as essayé:

Code :

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

me.reg

et voir s'il te propose bien "REG"

sinon:

Code :

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

me.recordsource="tarequete"