víctor ibarz

La manera más sencilla de hacer esto es anexando los datos de la tabla en otra tabla. En esta otra tabla tener configurado tu campo "Nº pedido" como clave principal. Entonces la consulta quedaría así: El resultado es que no te anexará los duplicados,...

Lo puedes hacer del siguiente modo: Siendo Tabla1 tu tabla Con_Nacionalidad y Consulta1 tu consulta Con_Nac_Desc

Es posible, solo tienes que añadir a tu criterio otro criterio: campo Como "*" & ([Formularios]![FORMULARIOBUSCADOR]![TexNOMBRE]) & "*" AND campo is not null

Sergio, En cuanto a la estructura de tablas que planteas, a largo plazo no parece la manera más práctica de organizar los datos, yo optaría por una tabla de pagos con los siguientes campos: Idpago de tipo autonumérico y clave principal de la...

Podrías probar algo así: Private Sub Buscar_Click() Dim rst AS DAO.Recordset x = InputBox("Ingrese Nombre", "BUSQUEDA POR NOMBRE") x=UCase(x) Set rst = Adodc1.RecordSetClone rst.MoveFirst rst.FindFirst "NombredeCampo = """ & x & """" If Not rst.EOF...

En SQL server tiene que ser tipo de datos "bit", con valor predeterminado "0". A tener en cuenta que los "Verdadero" sql los entiende como "1" en lugar del -1 que tenemos por costumbre en access.

Para eso tendrás que añadir el campo "Actividades" como encabezado de fila, así tendrás agrupado por año, día y actividad.

Apuesto a que te pasa solamente para las fechas en las que el día es menor que doce, ¿verdad? Utiliza esto: vfecha = Format(Date, "dd/mm/yyyy") if day(vfecha)<13 then vfecha=format(vfecha,"mm/dd/yyyy") Siendo vfecha la variable a utilizar en las sql...

No sé si es lo más óptimo, pero una posibilidad es contar cuantos registros hay en tu tabla con ese código. Algo así: 'recogemos el valor del código en la variable codigo, en este caso la rescato de un control del formulario que se llama codigoo...

Lo puedes hacer así: vfac = Me.factura.Value vprod = Me.producto.Value vcua = DCount("*", "[Tabla1]", "[Factura]=""" & vfac & """ and [Producto]=""" & vprod & """") If vcua > 0 Then MsgBox "Atención! Ya existe esta combinación!" End If Suponiendo que...