Solution for Filter formula in Excel or Dynamic query in Access

But then I face the following challenge. The results from this "Form based Parameter Query" I automatically want in Excel through a Power Query refresh.
Without the "Form-Based Parameter Query - Dynamic Queries" I was able to bring the data from that query in Excel. But then without the 2 filters.

How can I put the dynamic data in a static table (automatically)?

When I now run the query, through the FORM parameters, it gives the following error "Calculated columns are not allowed in SELECT INFO statements". I have 2 calculated columns. If I remove these 2 calculated columns from the query, it still gives the same error.

Option Compare Database
Option Explicit

Public Sub UpdatePowerQuery(ByVal CWorkbook As Excel.Workbook, ByVal CConnectionName As String)

  On Local Error GoTo LocalError

  Dim Connection As Excel.WorkbookConnection
  
  Dim RefreshRequired As Boolean
  
  For Each Connection In CWorkbook.Connections
    RefreshRequired = (Connection.Name = CConnectionName)
    If RefreshRequired Then
      Connection.Refresh
      Debug.Print Connection.Name & " refreshed."
      Exit For
    End If
  Next Connection

  Set Connection = Nothing
  Exit Sub
  
LocalError:
  Debug.Print "UpdatePowerQuery()"; Err.Number; Err.Description
  
End Sub

Select allOpen in new window

But the Report in Excel need to be per user & production period [..]

Thus you need a Excel template with an active connection to the local user database

1. Have a automatically generated list of data, from 3 tables, with all ProductionPeriod & Usernames.
2. Have that list be filtered based on ProductionPeriod & Username.

I created the public function: DeleteTable in the same "Click Event Code Builder" of the button "List operator's production".

3. Open your form : "List Felling Operator's Production" in Design Mode

change the button: "List operator's production" 's OnClick event from Macro Builder to Code Builder, and insert the following codes:

Dim SQL As String
    'Drop tmp table
    Call DeleteTable("tbl_tmp_ExcelPowerQuery")

Select allOpen in new window

Private Sub List_operator_s_production___Command10_Click()

    'Reinsert tmp data
    DoCmd.SetWarnings False
    SQL = "Select * into tbl_tmp_ExcelPowerQuery from [Operators Felling Details Report 20200112]"
    DoCmd.RunSQL SQL
    DoCmd.SetWarnings True
    
    'Open result
    DoCmd.OpenQuery "Operators Felling Details Report 20200112", acViewNormal, acEdit

End Sub

Select allOpen in new window