Caros colegas, este VBA deveria constatar a existência do conteudo do controle DATAINICIAL que pertence a outro Formulário chamado FrmAdministradorlx, porém ele executa o Minimize e o comando If seguinte, mesmo quando o DATAINICAL está vazio.
Por quê isto ocorre?
Private Sub VISUALIZAR_Click()
On Error Resume Next
DoCmd.OpenForm "frmadministradorlx"
If IsNull(DATAINICIAL) Then
Exit Sub
Else
DoCmd.Minimize
End If
If GPRELAT.Value <> 0 Then
Dim REL As String
...
Agradeço desde já!
MPS
Por quê isto ocorre?
Private Sub VISUALIZAR_Click()
On Error Resume Next
DoCmd.OpenForm "frmadministradorlx"
If IsNull(DATAINICIAL) Then
Exit Sub
Else
DoCmd.Minimize
End If
If GPRELAT.Value <> 0 Then
Dim REL As String
...
Agradeço desde já!
MPS