StackOverflow2013

Note that there are some explanatory texts on larger screens.

plurals

PO
primarykey
Id
4217295
data
AcceptedAnswerId
0
AnswerCount
0
ClosedDate
CommentCount
0
CommunityOwnedDate
CreationDate
2010-11-18T16:41:14.787
FavoriteCount
0
LastActivityDate
2010-11-18T16:56:47.333
LastEditDate
2010-11-18T16:56:47.333
LastEditorUserId
2548
OwnerUserId
2548
ParentId
4107399
PostTypeId
2
Score
0
ViewCount
0
LastEditorDisplayName
text
Body
<p>Here are some very rough notes notes. They are only minimally tested, and using IN would be a disaster with a lot of values, however, it would be easy enough to switch this round and use an excluded list. Perhaps you can get some ideas.</p> <pre><code>Dim oPTable ''PivotTable Dim oPM ''PivotMember Dim oFUpd ''PivotFilterUpdate Dim oChildren ''ChildMembers Dim fset ''FieldSet Dim sWhere As String Dim sTemp As String Dim sSQL As String Dim sDelim As String Dim aStates As Variant Dim i As Integer Dim rs As DAO.Recordset sDelim = """" aStates = Array("Cleared", "Checked") ''Possible states Set oPTable = Forms(0).PivotTable.ActiveView sWhere = vbNullString For Each fset In oPTable.FieldSets sTemp = vbNullString Set oChildren = oPTable.FieldSets(fset).Member.ChildMembers For i = 0 To oChildren.Count - 1 Set oPM = oChildren(i) Set oFUpd = oPM.Field.FieldSet.CreateFilterUpdate If aStates(oFUpd.StateOf(oPM) - 1) = "Checked" Then Select Case fset.BoundField.DataType Case adChar, adLongVarWChar sTemp = sTemp & "," & sDelim & oPM.Caption & sDelim Case adInteger sTemp = sTemp & "," & oPM.Caption Case adDate sTemp = sTemp & ",#" & oPM.Caption & "#" Case Else '' The above is a very short list. '' Stop End Select End If Next If sTemp > vbNullString Then sWhere = sWhere _ & " AND [" & fset.Name & "] IN ( " & Mid(sTemp, 2) & ")" End If Next sSQL = "SELECT DISTINCT ID FROM [" & oPTable.Control.DataMemberCaption & "] " sSQL = sSQL & "WHERE 1=1" & sWhere Set rs = CurrentDb.OpenRecordset(sSQL) MsgBox "Unique: " & rs.RecordCount </code></pre>
Tags
Title
singulars
PostAcceptedAnswerId
1. This table or related slice is empty.
PostParentId
1. POA "Count" Based off Filters set in a Pivot Table
  singulars
  PostTypePostTypeId
  PTQuestion
PostTypePostTypeId
1. PTAnswer
UserLastEditorUserId
1. USFionnuala
UserOwnerUserId
1. USFionnuala
plurals
PostLinksPostIdRelatedPostId
1. This table or related slice is empty.
PostLinksRelatedPostIdPostId
1. This table or related slice is empty.
PostsAcceptedAnswerId
1. This table or related slice is empty.
PostsParentIdCreationDate
1. This table or related slice is empty.
VotesPostIdCreationDate
1. This table or related slice is empty.
CommentsPostId
1. This table or related slice is empty.

Querying!

Guidance

A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.