ohmygood

En el evento form_load() del formulario pon lo siguiente: IF ME.NEWRECORD THEN MSGBOX "EL REGISTRO NO EXISTE." END IF Y SI QUIERES QUE NO SE QUEDE EL FORMULARIO ABIERTO. IF ME.NEWRECORD THEN MSGBOX "EL REGISTRO NO EXISTE." DOCMD.CLOSE END IF...

Para imprimir el formulario sólo con el que tienes en pantalla pones un botón con lo siguiente: Dim nficha As Integer nficha = Me.numero_cliente DoCmd.ApplyFilter , "numero_cliente = " & Me.numero_cliente DoCmd. PrintOut DoCmd. ShowAllRecords DoCmd....

Puedes hacer lo siguiente, crear varias consultas, cada una de ellas será el top10, el top20 y las que convengan. Eso se hace en el diseño de la consulta, en la barra de herramientas, donde pone Todo pones 10 (para top10) guardas la consulta y tienes...

Antes de la acción o acciones que realice la macro, pones la acción "EstablecerAdvertencias" en No (en inglés si fuese el caso "SetWarnings") Con esto no te preguntará, al final de todas las acciones vuelves a restablecer las advertencias para que...

Supongamos que tienes un formulario de clientes y estamos viendo un registro (toda la ficha del cliente). En él tenemos un campo que es nombre_de_cliente donde vemos e introducimos el nombre del cliente. Tenemos un informe que incluye todos los...

Supongamos que el campo realmente se llame fecha y el checkbox se llame checkbox3. Supongamos que queremos poner la fecha del sistema, la actual en ese campo fecha. En el evento checkbox3_click() escribe lo siguiente Me.fecha = date() Y ya está. ¿Te...

Según tu ejemplo... forms!aportes!nombre = me.nombre ó forms!aportes!nombre = forms!socios!nombre

Ejemplo de la función UCase En este ejemplo se utiliza la función UCase para devolver la versión en mayúsculas de una cadena. Dim LowerCase, UpperCase LowerCase = "Hola Mundo 1234" ' Cadena a convertir. UpperCase = UCase(LowerCase) ' Devuelve "HOLA...

Te refieres con celda a una caja de texto, ¿verdad? Prueba a poner en el evento after_update del control (caja de texto, supongamos que se llama texto5) el siguiente código. En este ejemplo si en la caja escribimos MAYOR se pondrá el fondo en verde....

Quizás se pueda hacer de otra manera, u optimizar el código que te paso. Pero este que te paso sirve, es funcional. Se pone en el formulario en el campo que quieras darle ese formato, en el evento afterupdate, aquí va: Dim letra1 As String Dim...