我正在尝试将科学怪人（Frankenstein）的一些VBA代码一起返回报表中子报告中的变体的页码。它基本上是一个目录，显示为自己的页面。子报表所基于的查询是更大报表的查询的更集中的版本，并返回我要在目录中引用的报表中的值。
子报表的布局如下：
Field 1 Field 2
This Text is somewhere in my report -------------------Page number here (Named Text6)
当单击字段2时，将触发以下代码：
Dim d As Variant
d = Me.FieldIAmLookingUp
DoCmd.GoToRecord acDataReport, "Statereports_q1", acGoTo = d
Me.Text6 = Current Record page number???
目标是使Text6（又名Field 2）等于与Field 1匹配的值的页码值