Eduardo Pérez Fernández

No puede utilizar el nombre del combo y la propiedad Column() porque según su imagen necesita es repetir los datos excepto la "Sucursal". Debe utilizar una función para esto. Algo como Call RepiteUltimo(Me, strMsg, "Impuestos", "Envío") Es una...

Puede validar que no quede en 0 programando el evento Antes de Actualizar del subformulario. Algo como Private Sub Form_BeforeUpdate(Cancel As Integer) If Me.campo <= 0 Then MsgBox "El valor del campo debe ser mayor que cero", vbInformation, "Le...

Pásese a Access o un servidor de datos como PostgreSQL. Si quiere escríbame a [email protected] y le doy apoyo

Andrés aunque este ejemplo está elaborado en Access 2019 la idea es la misma https://youtu.be/Bwg4KlJEkX4

Por si le sirve le dejo este ejemplo: Lo hago con una función la cual es el origen de datos de los campos EFECTIVO, TARJEETA ETC. Funcion a nivel de formulario Function montotipo(mtipo As Byte) As Double Dim strSQL As String Dim rs As Recordset...

Necesitaría definir i dependiendo si está activada la definición Explicita en True. Observo que en dato1 y dato2 son texto y si el prefijo inicia con letras algo como val("AD1258") retornaría el valor 0, excepto que se val("0012345") retorna 12345....

Es posible que al realizar la copia tenia la base de datos abierta. Pruebe abriendo un módulo y compilando a ver que error recibe.

Es fácil si aporta una imagen de su formulario, para dar una mejor respuesta.

Muy raro porque su pregunta inicia con "Como contar.." y resulta que le dan la solución es sumando, lo que no es igual.

Le complemento con esta función. Public Function GenerarNumeros(ByVal desde As Double, ByVal hasta As Double, ByVal cantidad As Integer) On Error GoTo hay_error Dim i As Integer Dim num As String Dim rs As DAO.Recordset 'Retiro la numeracion...