参考主表单选项卡上的表格表格

Question

我有很好的代码用于将子表格表（MS_table）导出到Excel。从早上起，我一直试图让它工作，以防子表格（MS_table）位于主窗体的其中一个选项卡上。我尝试了数以千计的语法变体。标签集合称为＆＃34;日期＆＃34;，它有两个标签：＆＃34;日期＆＃34;和＆＃34;样品＆＃34;。请帮助！

With Me.MS_table.Form.Recordset
    For Each fld In .Fields
        nfld = nfld + 1
        app.cells(2, nfld) = fld.Name
        If Me.MS_table(fld.Name).ColumnHidden Then
            r = 0
        ElseIf Me.MS_table(fld.Name).ColumnWidth = -1 Then
            r = 2.499 * 567
        Else
            r = Me.MS_table(fld.Name).ColumnWidth
        End If
        r = r / 567 * (100 / 18.65)
        app.cells(2, nfld).ColumnWidth = r
    Next
End With
app.range("a2:z2").Font.Bold = True
app.range("a3").copyfromrecordset Me.MS_table.Form.Recordset
app.Visible = True