Se ha producido el error 2447 en tiempo de ejecución

Al cargar un formulario en Microsoft Access me salta el siguiente error:

'Se ha producido el error 2447 en tiempo de ejecución. Hay un uso no válido de un . (punto), de un operador ! O de paréntesis ().

El código es algo sencillo:

Private Sub Form_Load()
If Texto169 = 1 And Texto189 = 1 Then
G411.Visible = True
ElseIf [Texto169] = 1 And [Texto189] = 2 Then
G412.Visible = True
ElseIf [Texto169] = 1 And [Texto189] = 3 Then
G413.Visible = True
ElseIf [Texto169] = 1 And [Texto189] = 4 Then
G414.Visible = True
ElseIf [Texto169] = 2 And [Texto189] = 1 Then
G421.Visible = True
ElseIf [Texto169] = 2 And [Texto189] = 2 Then
G422.Visible = True
ElseIf [Texto169] = 2 And [Texto189] = 3 Then
G423.Visible = True
ElseIf [Texto169] = 2 And [Texto189] = 4 Then
G424.Visible = True
Else
Texto155.Value = 3
End If
End Sub

Me da error en el primer If y no consigo solucionarlo.

1 respuesta

Respuesta

Es posible que alguno de los controles Gxxx no sea del tipo que esperas y no tiene la propiedad "Visible", por lo cual, te dará el error, además, de tener el "ElseIf" demasiado sobrecargado.

Te sugiero esta otra opción, y a ver si funciona mejor...

IF Me.Texto169= 1 then

    Select Case Me.texto189

                 Case 1
                        Me.G411.Visible = True
                 Case 2
                        Me.G412.Visible = True
                 Case 3
                        Me.G413.Visible = True
                 Case 4
                        Me.G414.Visible = True
      End Select

Else

    Select Case Me.texto189

                 Case 1
                        Me.G421.Visible = True
                 Case 2
                        Me.G422.Visible = True
                 Case 3
                        Me.G423.Visible = True
                 Case 4
                        Me.G424.Visible = True
      End Select

End if

Creo que así está más claro y si te da un error, te indicará exactamente el sitio.

Tambien intenta escribir tu todas las sentencias (NO LAS COPIES), porque al poner el "ME" te indicará el nombre del campo, y despues de poner el punto, aparecerá la propiedad "Visible"... Si esta no aparece, es porque ese tipo de control no está bien definido o tiene algún problema... Lo borras y lo vuelves a crear de nuevo.

Un saludo y espero que te funcione correctamente.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Pasar en cuadro de texto un determinado valor a texto.

Mi consulta es debido a si es posible en un cuadro de texto con un valor 1 que no mostrara este valor si no mostrar un texto.
2 respuestas

VBA Access: Filtro para registros que comienzan con...

¿Cómo se puede crear un filtro usando botones del alfabeto y que se muestren solamente los registros que comienzan con X letra?
2 respuestas

Cambiar de estado un botón

Necesito hacer en un formulario un botón que al hacer clic me cambie de estado: Primero: que diga SIN HACER (de color rojo) Segundo: que diga A MEDIO HACER (de color amarillo) Tercero: que diga HECHO (de color verde) Y que el formulario "se acuerde"...
2 respuestas

Ocultar hojas dependiendo contenido de una celda

Necesito un crear un macro que dependiendo del contenido de una celda me muestre una hoja y me oculte dos con nombres especificados. Ejemplo. Si el contenido de la celda BM 16 es “TODOS”, me muestre la hoja llamada “TODOS” y me ocultes las hojas...
1 respuesta

Problema al convertir Números a letras en función en Access 2007

Desde México, D.F. Tengo una función que me convierte los números a letras y la llamo desde un cuadro de texto independiente en un informe de Access 2007 =PesosMN([pago]) Me funciona perfectamente excepto por 2 situaciones: 1.- Cuando el valor del...
1 respuesta

Establecer un mismo valor a varios objetos

Una duda que siempre he tenido: ¿Hay alguna forma de poder simplificar un proceso donde todos los objetos similares pueda aplicarse un mismo valor? Por ejemplo: Teniendo una serie de casillas de verificación, a través del botón "Invertir selección"...
2 respuestas

Ayuda para convertir numero en texto en access 2007

Ya he revisado en internet y encontré num2text ya lo puse y funciona solo que me redondea los números osea no me maneja decimos ejemplo 120.56 da ciento veinteyuno según coloque los códigos en donde devén de ir pero pues el resultado no es lo que...
1 respuesta

Tengo un problema con una base de búsqueda en Access. No encuentro el error en el código de búsqueda (Es la 1ª vez que lo uso)

Como bien dice el titulo, soy nuevo en Access. Use una guía de un usuario para crear de 0 una base de consultas de empleados. La idea principal es buscar una persona según su DNI o ID (Identificación interna del trabajo) y que me muestre todos los...
2 respuestas

Código para mostrá datos en un comboxbox

Necesito un código que me permita llenar un combo box con los datos de una base de datos del campo nombre de la tabala empleados.. Que el combo se autocomplete cuando coloque una letra dentro del combo mostrando todas las coincidencias
1 respuesta

Activar un campo u otro en access 2010

Estoy haciendo un formulario y me gustaría poder hacer que teniendo un campo desplegable seleccionando un registro se activara un campo u otro difeerente.
1 respuesta