Testar se formulário ou relatório

Olá,

Estou usando um exemplo de Relatórios em Listbox ou Combox criado pelo Avelino.

Acontece que um de meus relatórios usa como chamada um form com uma combox para escolher
qual produto imprimir. depois de escolher o botão do form chama o relatorio.

Nessa sub ela testa se vazio e depois manda Imprimir
Como o Relatorio chamado na combo tem origem em um form não funciona nessa sub
pois teria que ser Docmd.openForm para depois poder valer essa sub abaixo.


Private Sub btImprimir2_Click()
If IsNull(Me!cboLista.Value) Then
MsgBox "Selecione um relatório da lista...", vbInformation, "Aviso"
Exit Sub
End If
DoCmd.OpenReport Me!cboLista.Column(2), acViewPreview

Eu criei um Button em um Grupo da Ribbon só com a chamada desse form para escolher e abrir impressão.
Teria como resolver na propria sub . ?


End Sub

No menu antigo a chamada é:
um botão que chama esse tipo de relatório.
Nesse botão ele abre antes um Form, onde só contem uma Combox com as Escolhas (que são 29 opções).
e o Botão de imprimir, onde chama o Relatório pelo nome dele que esta naquela lista do Avelino.
O problema é que como é um Form baseado em uma consulta ele abre a janela interna do access pedindo a opção do form
que estão as 29 opções.

Sim, entre o Relatório e a chamada tem um form para fazer uma escolha e só depois é montado a consulta para
preencher o form.

não sei se me fiz entender.

Esta questão diz respeito a Relatórios, e não módulos, razão pela qual eu transferi o tópico.

Vou tentar e retorno.