Bonjour,
Par un bouton de commande sur mon formulaire "frm_clients", j'ouvre un formulaire (sans source) "frm_locations_liste" qui contient un sous-formulaire "frm_locations_liste_sub".
Lorsque ce sous-formulaire est vide, je souhaiterais que le formulaire "frm_locations_liste" ne s'ouvre pas.
Voici la source de mon sous-formulaire :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 SELECT tbl_locations.Reference_location, tbl_locations.Reference_robe, tbl_locations.Reference_client, [Nom] & ' ' & [Prenom] AS [Nom+Prénom] FROM tbl_clients INNER JOIN (tbl_etiquettes INNER JOIN tbl_locations ON tbl_etiquettes.[Reference_robe] = tbl_locations.Reference_robe) ON tbl_clients.Reference_client = tbl_locations.Reference_client ORDER BY tbl_locations.Reference_location, tbl_locations.Reference_robe;
J'ai bien essayé ce code sur ouverture de mon formulaire "frm_locations_liste" mais j'obtiens un message d'erreur :
Le message d'erreur est Erreur d'exécution '2455'
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Private Sub Form_Open(Cancel As Integer) If Forms!frm_locations_liste!frm_locations_liste_sub.Form.RecordsetClone.RecordCount = 0 Then MsgBox "Il n'y a pas de locations pour ce client.", vbInformation Cancel = True End If End Sub
La reference d'une expression à la propriété Form/Report n'est pas valide.
Merci pour votre aide.
Partager