2010-03-30 4 views
0

J'ai un formulaire avec un cmdbutton qui ouvre actuellement un autre formulaire et montre tous les enregistrements pour plusieurs types de PartitionStyles et TrimFinishs (486 à présent), je dois être en mesure de filtre la seconde forme pour montrer seulement le TrimFinish dont j'ai besoin.Filtrer un formulaire en utilisant un bouton de commande sur un autre formulaire

Sous lbl600SeriesS_Click() privé Dim stDocName As String Dim stLinkCriteria As String

stDocName = "frmModules" 
stLinkCriteria = "Forms!frmModules![TrimFinish] = 1" 
DoCmd.OpenForm stDocName, , , stLinkCriteria 

End Sub

le moment, il ne montre qu'un nouveau record, je sais qu'il devrait y avoir 162 enregistrements à l'aide 1, qu'est-ce que j'ai manqué ou fait incorrect.

Répondre

1

Base stLinkCriteria sur un champ dans RecordSource de frmModules. Ainsi, si le RecordSource comprend un champ numérique nommé TrimFinish, essayez quelque chose comme ceci:

stLinkCriteria = "[TrimFinish] = 1" 

Si le RecordSource est une requête de dessin de plus d'une table, vous pouvez vous qualifier le nom du champ avec l'alias de table:

stLinkCriteria = "YourTableAlias.[TrimFinish] = 1" 

Si vous rencontrez encore des problèmes, éditez votre question pour décrire la fonction RecordSource de frmModules. S'il s'agit d'une requête, collez la vue SQL de la requête.

+0

Merci, stLinkCriteria = "[TrimFinish] = 1" fonctionne. On m'a demandé si je pouvais ajouter un autre filtre pour PartitionStyle dans la même section de code. – Shaun

+1

@Shaun Filtre pour PartitionStyle à la place ou en plus du filtre pour TrimFinish? Le texte ou le type de données numérique PartitionStyle est-il disponible? – HansUp

+0

HansUp. Géré pour le trier. Sous lbl600SeriesS_Click() privé Dim stDocName As String Dim stLinkCriteria As String stDocName = "frmModules" stLinkCriteria = "[PartitionStyle] = 1" stLinkCriteria = stLinkCriteria & "ET [TrimFinish] = 1" DoCmd .OpenForm stDocName,,, stLinkCriteria End Sub Acclamations. – Shaun

Questions connexes