valeur incorrecte pour ce champ
bonjour,
en sortie de contrôle d'un formulaire j'ai mis ce code
Code:
1 2 3 4 5 6 7 8
| Private Sub N°_risque_AfterUpdate()
Dim strSql As String
strSql = "SELECT [Risques SMR].[N° risque], [Risques SMR].[Périodicité des visites] FROM [Risques SMR] WHERE ((([Risques SMR].[N° risque])=[Formulaires]![Salariés]![Expositions sous-formulaire].[Form]![N° risque]));"
Forms.Salariés.Rythmicité = strSql
End Sub |
malheureusement il bloque sur
Code:
Forms.Salariés.Rythmicité = strSql
n'ayant aucune connaissance en VBA, je viens demander un petit coup de main. MERCI