Boa tarde colegas estou com dúvida a respeito da seguinte expressao, ela está chamando somente o "primeiro relatório" e são quatro.
Private Sub Comando50_Click()
If DCount("*", "CsRelAcAbCLIENTE") = 0 And DCount("*", "CsRelAcPgCLIENTE") = 0 And DCount("*", "CsRelDesAbCLIENTE") = 0 And DCount("*", "CsRelDesAbCLIENTE") = 0 Then
MsgBox "Não há dados a serem exibidos", vbOKOnly + vbCritical, "Atenção"
Else
DoCmd.OpenReport "GeralCLIENTE", acViewPreview
DoCmd.Close acForm, "FrmMovimentoCliente"
Exit_Comando50_Click:
End If
End Sub
Private Sub Comando50_Click()
If DCount("*", "CsRelAcAbCLIENTE") = 0 And DCount("*", "CsRelAcPgCLIENTE") = 0 And DCount("*", "CsRelDesAbCLIENTE") = 0 And DCount("*", "CsRelDesAbCLIENTE") = 0 Then
MsgBox "Não há dados a serem exibidos", vbOKOnly + vbCritical, "Atenção"
Else
DoCmd.OpenReport "GeralCLIENTE", acViewPreview
DoCmd.Close acForm, "FrmMovimentoCliente"
Exit_Comando50_Click:
End If
End Sub