RDV+DIAL chat illimit� dans ta r�g!
no save
Assistance
Achat
News

Forum | programmation
VBA access boucle sur une table
bema93, le mar. 22 juil. 2008 à 11:26:02
Bonjour,
tout le monde je souhaiterais parcourir les champs d'un table (ex: ma_table) un par un, et mettre un nombre aléatoire (completement aléatoire !) généré par une fonction publique irand() qui marche, dans une colonne qui s'appelle "aleat" c'est la colonne 30.
J'ai écrit ça mais ca ne me fait rien du tout au fait je ne sais pas du tout parcourir une table en écriture, à noter que je suis un rookie en vba.

'initialisation de mes champs
Dim db As DAO.Database
Dim myrst As DAO.Recordset
Set db = CurrentDb

Dim req As String
req = "SELECT * FROM [ma_table] "
Set myrst = db.OpenRecordset(req)

'je me place qu début
DoCmd.GoToRecord , , acFirst

'boucle
Do While Not myrst.EOF

myrst.Edit
'myrst.Fields("aleat").Value = irand() <= marche pas
'myrst.Fields(29).Value = irand() <= marche pas
'myrst![aleat] = irand() <= marche pas
'myrst.Fields("aleat") = irand() <= marche pas
myrst.MoveNext

Loop

Pourriez-vous SVP m'aider ça fait depuis 2 jour que je cogite la-dessus, je suis à cours d'idée, en plus je ne sais pas ce qui ne vas pas
Merci d'avanceConfiguration: Windows XP
Internet Explorer 7.0


Frappe Misere
juil. 08
Suivant
REPONSES
Frappe Misere
juil. 08
bema93
juil. 08
Frappe Misere
juil. 08
Archi-dessin
juil. 08
bema93
juil. 08
Archi-dessin
juil. 08
Archi-dessin
juil. 08
bema93
juil. 08
Version Web
Réalisé par RedShift
no save