Estou usando o VBA para carregar dinamicamente o conteúdo de um relatório e, dependendo do relatório selecionado no formulário do painel de controle que criei, a consulta do relatório pode ser filtrad

No início da minha função Report_Open, tenho o seguinte:

Private Sub Report_Open(Cancel As Integer)
    Me.Filter = "VIP=True"
    Me.FilterOnLoad = True

Agora, isso estava funcionando quando eu iniciei este projeto - eu havia comentado essas linhas e, ao descomentá-las, descobriu que isso não funciona mais corretamente. Em vez de o filtro ser aplicado quando o relatório é carregado, eu tenho que recarregá-lo para que o filtro funcione - alternando para a visualização de impressão e retornando à visualização de relatório ou alternando para a visualização de design e, em seguida, novamente para a visualização de relatório ( no modo de design, o filtro selecionado é exibido no painel de propriedades

Estou carregando o relatório usando os botões de comando que permitem ao usuário visualizar, exportar para PDF ou imprimir (abre na visualização de impressão). Nenhum desses comandos faz com que o relatório seja aberto com o filtro aplicado - ele precisa ser recarregado.

Os comandos que estou usando para carregar o relatório estão abaixo para referência:

If (Action = "View") Then
    DoCmd.OpenReport "Test", acViewReport
ElseIf (Action = "PDF") Then
    DoCmd.OutputTo acOutputReport, "Test", acFormatPDF
ElseIf (Action = "Print") Then
    DoCmd.OpenReport "Test", acViewPreview
End If

Ok, não tenho idéia do porquêMe.Filter eMe.FilterOnLoad don't work, já que de tudo que eu já vi no MSDN e em outros lugares, deve funcionar. Dito isto, descobri que posso usarDoCmd.ApplyFilter em vez de

'Check if VIP - add filter if necessary
If (getGlobal(1) = True) Then
    DoCmd.ApplyFilter , "VIP = True"
End If

Eu ainda gostaria de saber por que o outro caminho estava se comportando de maneira tão estranha, se alguém tem alguma idéia ...