Oi será que alguém saberia me explicar como faço para que se o que procuro na minha consulta não for encontrado ele não abra o form vazio e sim diga uma mensagem " Não encontrado " por exemplo

Faça um teste na consulta antes : if rst.eof then msgbox "Não Há registros"
Exit Sub

Oi rogerio eu fiz uma consulta por instalção e criei um form que tem origem essa consulta. Não entendi direito o que tenho que fazer, pois não existe código eu clico em um botão ai ele executa a consulta e mostra nesse form.

Oi,

no evento ao abrir do form que é acoplado a consulta coloque:

    On Error Resume Next
    If Me.RecordsetClone.RecordCount = 0 Then
        MsgBox "Não existem dados para a consulta", vbExclamation, "Não há dados"
        Cancel = True    'Cancela a abertura
    End If


  

Deixe-me saber se isso ajudou

Ajudou !!
Valeu mesmo.