[Resolvido]Imprimir filtro de um formulario contínuo

Olá galera estou novamente precisando da ajuda de vocês.Tenho um formulário continuo com uma combo que utilizo para filtrar alguns regitros específicos. Gostaria de imprimir o resultado do filtro, então criei um relatório e um botão "imprimir" no formulário. O que ocorre é que quando utilizo o filtro, e clico no botão imprimir, o relatório mostra o resultado do filtro para impressão bonitinho, porém se eu não utilizar o filtro o relatório aparece em branco e eu gostaria que nesse caso ele mostrasse todos os resultados. Alguém pode analisar o código que estou utilizando e me ajudar a corrigi-lo. Preciso que funcione assim: quando eu não utilizar o filtro da combo que apareça todos os resultados no relatório para impressão.
Abaixo segue o código que estou usando:

Private Sub btnImprimir_Click()
Dim filtro As String
If Len(Me!combtipo & "") > 0 Then filtro = "tipo = '" & combtipo.Column(0) & "'"
If filtro = "" Then
End If

DoCmd.OpenReport "Rel_CadTel", acViewPreview, , filtro
DoCmd.Maximize
End Sub

Grato, Kadu!

Boas Kadu, de uma pesquisada pelo operador Like...

Veja uma SQL com este operador:

        StrLista = "SELECT Detentos.ID, visitantes.ID_Primary,Detentos.[Nome] & Space (1) & [Sobrenome] As Detentos, visitantes.Visitante," _
                & "visitantes.EnderecoVis As Endereço, visitantes.BairroVis As Bairro, visitantes.CidadeVis As Cidade," _
                & "Visitantes.EstadoVis As Estado FROM Detentos LEFT JOIN visitantes ON Detentos.[ID] = visitantes.[ID_Visitante]" _
                & " IN '" & strPath & "'" _
                & " WHERE Visitantes.Visitante like '*" & Me.CboVisitante.Column(2) & "*';" _

Cumprimentos.

Caros, Piloto e Avelino, agradeço muito a ajuda de vc's pois com ela o problema foi resolvido. O código corrigido pelo Avelino funcionou perfeitamente e estou estudando e utilizando a sugestão do Piloto em outra parte do projeto. Tentarei fazer sozinho e entender o funcionamento, se eu não conseguir peço novamente a ajuda dos amigos.Por agora muito obrigado mais uma vez.

So faltou clicar no joinha da mensagem que o auxiliou.

O Fórum agradecer o Retorno.