Discussion :

[nadia123456]

lors ce que j'execute ce code il m'affiche une petite page ou il me demande de rentrer le nom de la macros


Private Sub Commande12_Click()

Dim sql As String
Dim rs As Recordset

sql = ("SELECT [LAST ([deplacement].dure_dep)] FROM deplacement, nomage, classe, salaries where [deplacement].N_dep=[salar_dep].N_dep and [salar_dep].matricul=[salaries].matricul and [salaries].classe=[classe].classe and [salaries].nomage=[nomage].nomage")
Set rs = CurrentDb.OpenRecordset(sql)
End Sub


qu'est ce que ce la veut dir a votre avie !!
et command corrige cette erreur
et merci d'avance !!!!

[willcartley]

la table "salar_dep" n'est pas dans ton "FROM".
Essaye de le rajouter pour voir.

et puis je crois qu'il vaut mieux faire:

Code :

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

Set rs = Application.CurrentDb.OpenRecordset(sql)

... Mais c'est pas ton source de problème apparemment.