Ejecucion macro access segun una condicional
Tengo un formulario en access el cual por medio de código necesito que ejecute una macro llamada Online pero dependiendo de una variable que se coloca en un cuadro de texto que se encuentra en el formulario en donde se escribe la letra (A, B o C), el código esta de la siguiente manera:
If ([Formularios]![Datos_Formulario]![Situacion]) = A Then
Select Case Me.Reloj.Caption
Case "9:00:00 a. M."
DoCmd.RunMacro "Online", , ""
End Select
Else
If ([Formularios]![Datos_Formulario]![Situacion]) = "B" Then
Select Case Me.Reloj.Caption
Case "3:31:00 p. M."
DoCmd.RunMacro "Online", , ""
End Select
Else
If ([Formularios]![Datos_Formulario]![Situacion]) = "C" Then
Select Case Me.Reloj.Caption
Case "4:40:00 p. M."
DoCmd.RunMacro "Online", , ""
End Select
End If
End If
End If
End Sub
El problema que presento es que desde la primera validación de IF genera un error y no deja continuar el código, alguien sabe que falta o que puedo modificar para que ejecute cuando esas condicionales se cumplan.