T
Tillano
Hi there!
Newby to the MSDN forums and please forgive my ignorance and mistakes!
I am creating a database with which I plan to analyse certain conferencing
usage data and am making use of forms containing subforms displaying pivot
tables.
What I would like to do is to be able to 'double-click' a value/field in
that pivot table, resulting in another form opening and showing the
corresponding 'detail' record. I used to be able to use the docmd.openform
method and 'feeding' it the criteria for the record. I now can't even get the
data from the pivot table to pipe into the openform command. I have tried
using the full name of the subform, but it doesn't seem to work with the
pivot table.
Private Sub c_ConferenceID_DblClick(Cancel As Integer)
Dim stLinkCriteria As String
stLinkCriteria = "[c_ConferenceID]=" & Me![c_ConferenceID]
If IsOpen("Billing Summary") Then
Forms![Billing Summary].Visible = False
Else
End If
DoCmd.OpenForm "Meeting detail", , , stLinkCriteria, acFormEdit
DoCmd.GoToRecord acForm, "Loans", acPrevious
End Sub
I really like the pivot table presentation as it allows me to
collapse/expand data quickly and have a nice clean presentation of the data.
Very greatful if anyone could help me out on this one!
Thanks in advance,
Hans
Newby to the MSDN forums and please forgive my ignorance and mistakes!
I am creating a database with which I plan to analyse certain conferencing
usage data and am making use of forms containing subforms displaying pivot
tables.
What I would like to do is to be able to 'double-click' a value/field in
that pivot table, resulting in another form opening and showing the
corresponding 'detail' record. I used to be able to use the docmd.openform
method and 'feeding' it the criteria for the record. I now can't even get the
data from the pivot table to pipe into the openform command. I have tried
using the full name of the subform, but it doesn't seem to work with the
pivot table.
Private Sub c_ConferenceID_DblClick(Cancel As Integer)
Dim stLinkCriteria As String
stLinkCriteria = "[c_ConferenceID]=" & Me![c_ConferenceID]
If IsOpen("Billing Summary") Then
Forms![Billing Summary].Visible = False
Else
End If
DoCmd.OpenForm "Meeting detail", , , stLinkCriteria, acFormEdit
DoCmd.GoToRecord acForm, "Loans", acPrevious
End Sub
I really like the pivot table presentation as it allows me to
collapse/expand data quickly and have a nice clean presentation of the data.
Very greatful if anyone could help me out on this one!
Thanks in advance,
Hans