[Resolvido]não abrir se não tiver dados

Boas

Tenho um formulário para liberação de requisições financeiras....
Em não tendo requisições a liberar, o formulário abre em branco.....
Pergunto se é possível, a exemplo da opção que temos em relatórios, não abrir se não tiver dados, se podemos fazer o mesmo com o formulário.
Não abrir o formulário e mostrar uma mensagem "No momento não existem requisições a serem liberadas"


grato
AErmel

Bom dia,
Semelhante ao relatório: crie recordset de dados a carregar pelo formulário; se não tiver dados não abre o formulário

Bom dia amigos, com permissão do grande mestre Alexandre Neves

Uso dessa forma:

If Form.RecordsetClone.RecordCount = 0 Then
MsgBox "Não existem dados para exibir", vbExclamation, "Sem dados!"
DoCmd.Close acForm, "NomeDoFormulario"
Exit Sub
End If

Olá Senhores, permitam-me o pitaco:

Supondo que um sub formulário não possua dados o correto seria:

No evento Ao Abrir do formulário principal insira o código abaixo.

Private Sub Form_Open(Cancel As Integer)
If Me.NomeDoSubformulário.Form.RecordsetClone.RecordCount = 0 Then
MsgBox "Sua Mensagem.    ", vbExclamation, "  Atenção"
DoCmd.Close acForm, "SeuFormulárioPrincipal"
Exit Sub
End If
End Sub


Abraços, WSenna

Grande Mestre Avelino, bom dia.

Amigão, concordo plenamente com você mas preferi usar o termo NomeDoSubformulário para facilitar o entendimento dos nossos amigos.
Quanto ao argumento Cancel realmente o código fica muito mais enxuto, contudo, após a mensagem principal surge nova mensagem da Microsoft "A ação Openform foi cancelada" e isso não é legal.

Um grande abraço e tenha um ótimo final de semana.

WSenna

Boas

Alexandre - A ideia era esta mesmo.
Fernando - Funcionou com o código indicado.
Wagner - Deu erro 2445 --- Você inseriu uma expressão que contem uma referencia invalida à propriedade Form/Report
Avelino - Funcionou com o código indicado.

Trata-se de formulário com sub formulário - Se não houverem requisições para liberar, ambos não conterão dados - vinculo pelo numero da requisição.
Melhor mesmo é tratar na abertura do formulário.
Ficou bem simplificado...

Agradecimentos a todos e bom fim de semana.

AErmel

Pra você também amigo, bom final de semana..