VBA AccessRésolu

Question

VBA Access liste déroulante



Bonjour,

Pb en VBA sur Access sur un champ de liste déroulante

Private Sub Étiquette35_Click()

Dim Salaires As DAO.Database

Dim couts_horaires As DAO.Database

Dim dprenom_nom As DAO.Recordset

DoCmd.OpenForm "couts_horaires"

DoCmd.OpenForm "Salaires"

Set Salaires = CurrentDb

Set dprenom_nom = Salaires.OpenRecordset("Salaires")

dprenom_nom.MoveFirst

MsgBox "nom = " & dprenom_nom & ""

End sub

Salaires et couts_horaires sont 2 formulaires

dprenom_nom est un champ de liste déroulante

Il refuse de me positionner sur le 1er enregistrement et d'écrire dans la MsgBox le nom ???

Merci

PCPT · Accepted Answer

salut,

on affiche une STRING, tu essayes d'afficher un RECORSET...

MsgBox "nom = '" & dprenom_nom(0).value & "'" 

<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

VBA Access

1 réponse

Votre réponse

Discussions similaires