MS Access数据透视表获取所选项目VBA

Question

我已经在MS access中创建了带有按钮和Pivot-SubForm的表单。当我单击按钮时，我想在枢轴中获取选定的项目。 当光标位于上方时，该项目会自动显示一个标签，该标签带有要传递给代码的字符串，因此我相信这是可能的。

我不知道，到目前为止，我在3W上的网页上都找不到任何东西。

Answer 1

如果不需要外部按钮触发事件，则可以在数据透视表子窗体上使用Form_Click（）事件，并检查用户单击的数据透视表单元格的数据：

If Not Me.PivotTable.activeObject Is Nothing then
    If Me.PivotTable.activeObject.Field.Basename = "ODA" Then
        'Use the value Me.PivotTable.activeObject.Value 
    End If
End If

通过这种方式，如果用户单击ODA值，则可以获得用户单击时所在的值。您还可以将ODA列设置为超链接的格式。

请注意，您也可以使用Me.PivotTable.activeObject.Field.Caption或Me.PivotTable.activeObject.Field.DataField代替Me.PivotTable.activeObject.Field.basename；我不确定这些差异。

还请注意，可以通过查看Me.PivotTable.activedata.currentcell.Recordset！[field_name]

使用同一条记录中的其他值！

（在Access 2010上测试）