Question : Problèmes de Subform Recordset

Approuver… ce qui suis moi faisant mal ici.  Le code suivant produit l'erreur d'exécution 424.

strUser = NTDomainUserName
Dim f comme Form
Set f = formes ! frmMaster


f.txtNTID = strUser

strSAP =
strQry = « tblOrgStructure.PersonID CHOISI, tblOrgStructure.EmployeeName, tblOrgStructure.OrgUnitCode, tblOrgStructure.AffiliationCode, tblOrgStructure.EntityCode, tblOrgStructure.BusinessCategoryCode, tblOrgStructure.BusinessAreaCode, tblOrgStructure.OrgLevel, tblOrgStructure. [Numérique en chef], tblOrgStructure. [Nom en chef], tblOrgStructure. [Titre en chef], tblOrgStructure. [Entité proposée], tblOrgStructure. [BA proposé], tblOrgStructure.UserID, tblOrgStructure.Modified, tblOrgStructure.VerDate de tblOrgStructure OÙ (((tblOrgStructure. [Numérique en chef]) = strSAP)); le « sf du

Dim comme sf de Form
Set = forme ! frmMaster ! sfrmModifications. Form.RecordSource = strQry class= de

Réponse : Problèmes de Subform Recordset

Ok, j'ai trouvé un travail autour de la solution que je suis confortable avec.  Je signalerai ici au cas où n'importe qui autrement pourrait trouver les informations utiles.

Dans la vue de la conception de votre forme, étendre le subform au-dessus de la commande d'étiquette--ne pas la mettre dans la commande d'étiquette--vous aurez seulement une commande de subform pour votre forme entière, pas multiple des mêmes par lesquels j'ai commencé. Alors sur l'événement du changement de la commande d'étiquette (non chaque page, la commande d'étiquette) vous configurerez le subform avec les données appropriées.

Ceci fonctionne pour moi ! !