Problema con cambio de fuente de datos en subformulario en MS Access
Publicado por Ibrahim (4 intervenciones) el 09/04/2021 20:54:45
Buenas tardes y de antemano muchas gracias. He buscado mucho y no consigo la solución, por eso pregunto por aquí. Estoy haciendo una rutina que cambie el origen de datos de un subformulario dependiendo de si un campo tiene un valor numérico o no, "F_ALB_F" y "F_ALB_NOF" son consultas destinadas a ser el origen de datos. El error lo da al ejecutar la instrucción dentro del IF
Obtengo el error 2766 em tiempo de ejecución "El objeto no contiene el objeto de automatización 'Formularios' "
El código en VBA es el siguiente:
Obtengo el error 2766 em tiempo de ejecución "El objeto no contiene el objeto de automatización 'Formularios' "
El código en VBA es el siguiente:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Sub prueba()
Dim valor As Integer
valor = Forms("factura").CODALB.Value
If (IsNumeric(valor)) Then
Forms!factura!F_ALB.Form.RecordSource = "F_ALB_F"
Else
Forms!factura!F_ALB.Form.RecordSource = "F_ALB_NOF"
End If
End Sub
Valora esta pregunta


0