Eduardo Pérez Fernández

Eduardo Pérez Fernández

Enseñar no cuesta nada
 522K puntos  Colombia @eperezfer desde - visto
Preguntar

Respuestas

Isertar un pago en un Formulario de Recibo en access

Le dejo esta idea: Crear una relación entre las tablas "Recibos" y "Formas de Pago" basada en una clave única que las relacione, por ejemplo, un campo "ID Recibo". Esto asegurará que los registros en "Formas de Pago" estén vinculados correctamente a...
Respuesta en y en 1 temas más a

Como adiciono dato a combobox que no está en lista

Le dejo este ejemplo, debe programar el evento Al no estar en la lista. Private Sub cboClienteNotInList(NewData As String, Response As Integer) Dim intReply As Integer intReply = MsgBox("El Cliente'" & NewData & _ "' no está en la lista, quiere...
Respuesta en y en 3 temas más a

Necesito Query sql obtener factura

Le dejo este script SELECT f.* FROM facturas f JOIN estado_cliente ec ON f.fecha = ec.fecha_estado AND f.cliente_id = ec.cliente_id WHERE ec.estado = 'alta';
Respuesta en y en 1 temas más a

Envío de informe personalizado con nombre y correo

Le dejo esta alternativa con Outllook Sub EnviarCorreosAdjuntos() Dim db As DAO.Database Dim rs As DAO.Recordset Dim appOutlook As Outlook.Application Dim msg As Outlook.MailItem Dim codigoAnterior As String Dim adjuntos As String Set db =...

Con un click encampo de formulario acceder a otro formulario.

Sería no utilizar el subformulario con el formulario principal, en este caso en el evento Al hacer clic en el campo del formulario CLIENTES utilice DoCmd.OpenForm "subformulario", , , "idcliente=" & Me.idcliente Además, puede programar para que el...
Respuesta en y en 2 temas más a

Como buscar datos en una tabla

Fernando cualquiera de las respuestas son acertadas solo le recomiendo no utilizar nombres para relacionar trate de utilizar un ID y establecer la relación de uno a varios
Respuesta en a

Cambio color formulario según botón seleccionado

Pruebe con este código Private Sub btnColor_Click() If Me.btnColor.Value = True Then Me.BackColor = RGB(255, 0, 0) ' Rojo Else Me.BackColor = RGB(255, 255, 255) ' Blanco End If End Sub
Respuesta en y en 1 temas más a

Envío de informes a correos electrónicos

Le dejo este código Sub EnviarCorreoConInformeAdjunto() Dim db As DAO.Database Dim rs As DAO.Recordset Dim oApp As Object 'Aplicación Outlook Dim oMail As Object 'Correo electrónico Dim strSQL As String Dim strTempPath As String Dim strReportName As...

Poner valor temporal en cuadro de texto independiente según valor de casilla de verificación de otro formulario.

Estoy de acuerdo con Enrique cambie el campo booleano "Pagado" por un campo fecha, así puede totalizar solo los de determinada fecha o adicione un campo para registrar la fecha cuando activo la casilla a true, aunque no es lo ideal.