Error 13 no coinciden los tipos de dato

Tengo el siguiente código

If DCount("id", "Libreta", "CLAVE='" & Me.P1 & "'" And "NOMBRE='" & Me.PN1 & "'") > 0 Then

 MsgBox "OCUPO ESTA PLAZA ANTES"

end if

Lo raro es que funcionaba según yo

Pero ahora me arroja este error

Tanto clave como nombre son texto corto

¿Ayuda qué puede ser?

2 Respuestas

Respuesta
2

A simple vista, te sobran comillas dobles :

If DCount("id", "Libreta", "CLAVE='" & Me.P1 & "' And NOMBRE='" & Me.PN1 & "'") > 0 Then
Respuesta

Aparte de lo que te comenta Sveinbjorn ( un saludo), podría ser que Clave fuera un Número, y entonces >>

If DCount("id", "Libreta", "CLAVE= " & Me.P1 & " And NOMBRE='" & Me.PN1 & "'") > 0 Then

Si Clave es un Texto, ésta línea sería inadecuada y la correcta es la que te cita Sveinbjorn. Saludos a los dos >> Jacinto

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Duda excel - macro protegida

Tengo la siguiente macro de Excel para ocultar columnas, pero a la hora de proteger la hoja me da el siguiente error, esta macro la repito 18 veces en la misma hoja-excel modificando en cada modulo las columnas que debo ocultar, mensaje error: "no se...
2 respuestas

Mostrar datos de dos hojas en listbox (vba excel)

Tengo un form, desde donde selecciono un No de Pedido mediante un combobox. Y me trae toda la info desde la hoja salidas (hoja5). Pero quisiera añadir la ubicación que tengo en mi hoja Artículos (hoja3). Mediante estas líneas de código he conseguido...
1 respuesta

Saludos, me gustaría saber si sabes hacer una macro para que recorra 12 hojas, cada una es un registro de los gastos de cada mes

Hay un 3ra hoja, ahí hay 3 celdas, una es la categoría del gasto, otra es el mes y la otra es el importe, lo que quiero es que cuando ponga la categoría del gasto, y el mes, me arroje el importe de dicha hoja.
2 respuestas

Como priorizar una celda antes que otra?

Voy directo al punto. Tengo 3 celdas A1, A2 e A3. A3 es igual A1, pero mi prioridad es A2, si esta celda contiene un valor, A3 ignora A1 y pasa a ser igual A2. ¿Podéis ayudarme con esto?
1 respuesta

Error en código para Password al abrir formulario

He creado una contraseña con el siguiente código. Lo que me sucede es que cuando la. Contrsseña es incorrecta me muestra un error. ¿Hay algo que deba añadir a mi código? Gracias Dim MyPass As String Dim TuPass As String MyPass="clavesecreta" 'Clave...
1 respuesta

Crear una tabla desde vba añadiendo los campos de forma dinámica

Quiero crear una tabla desde código y pasarle los campos de forma dinámica ya que son 300 campos, los campos del tipo number.
1 respuesta

Una vez aplicado el macro para que se marque una X con solo dar doble click, ¿Cómo hago que solo se pueda marcar una X por fila?

Ya apliqué el macro para que se marque una X con solo dar doble click: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Target.Value = "X" End Sub ¿Ahora cómo hago que solo se pueda marcar una X por fila? Quiero que...
1 respuesta

¿Cómo puedo crear una Macro en Ms Excel que permita que con dar doble click en una casilla, se escriba una X?

Quiero que con dar doble click en una casilla, se escriba automáticamente una X. Sin embargo, no tengo conocimientos acerca del uso de Macros así que voy a necesitar instrucciones detalladas, claras y precisas.
1 respuesta

Mejorar el tiempo de ejecución de un For Each c In Me.Controls

Tengo un formularios con varios objetos y 231 son txt que les quiero pasar por parámetro un valor. Esto lo consigo pero la ejecución es de 4 seg. Se podría agilizar el tiempo de ejecución os envío el código. 'Congelamos la pantalla hasta que termine...
1 respuesta

Excel, Calcular semana siguiente a la fecha de hoy

Solicito su colaboración con lo siguiente: Tengo un usrform en donde en el txbFechaActual trae la fecha del día (p. Ej. Hoy 22/03/2019) en el txbFechaInicial el usuario debe escribir la fecha del siguiente lunes que para el ejemplo sería 25/03/2019...
1 respuesta