Buenos días de nuevo.
Este es el código de la función que he hecho:
------
Public Function ColorMarca()
If Marca.Value = "Sin marca" Then
AnillaMarca.Value = "////"
AnillaMarca.BackColor = RGB(255, 255, 255)
AnillaMarca.ForeColor = 0
Else
AnillaMarca.Value = ""
End If
If Marca.Value = "Blanco" Then
AnillaMarca.BackColor = RGB(255, 255, 255)
End If
If Marca.Value = "Amarillo" Then
AnillaMarca.BackColor = RGB(255, 255, 0)
End If
If Marca.Value = "Naranja" Then
AnillaMarca.BackColor = RGB(255, 200, 0)
End If
End Function
------
Cuando lo llamo desde el informe mediante "Call ColorMarca", al abrir el informe me da un error "Se ha producido el error '424' en tiempo de ejecución: Se requiere un objeto"
y al pulsar en el botón "Depurar" me marca en amarillo la primera linea de la función
If Marca.Value = "Sin marca" Then
¿Qué estoy haciendo mal?