Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Private Sub Commande7_Click()
- If [Forms]![Formulaire_vba_numed]![choixmed].Value = 1 Then
- DoCmd.OpenReport "EtatMed1", acViewPreview
- Else
- DoCmd.OpenReport "EtatMed2", acViewPreview
- End If
- End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement