Respuesta
en
Visual Basic
y en 2 temas más
a
Inconvenientes con funciones SQL en código vba
El primer error es que antes del nombre del campo TL te falta una coma, y lo mismo con PRESIDENTE y CALLE. El segundo error, por el mensaje de error que pones, es que tienes cuadros de texto sin valor al ejecutar esa consulta, y si no tienen valor,...
Respuesta
en
Microsoft Access
y en 2 temas más
a
Calcular fecha desde una fecha inicial sumando días inhábiles (no laborables: sin domingos, sin sábados, sin festivos).
este ejemplo de Neckkito, en él lo tienes explicado paso a paso: http://siliconproject.com.ar/neckkito/index.php/component/content/article/95-ejemplos-explicados/ejemplos-de-codigo/135-contar-dias-2 Además, para colorear de rojo la F. Final, podrías...
Respuesta
en
Microsoft Access
y en 1 temas más
a
Crear un botón con código para pasar el modal de si a no en un formulario access
Si pones: Me.Modal=Not Me.Modal Cada vez que lo pulses te cambiará de estado(si no está modal pasará a estarlo y viceversa) Si lo quieres controlar de otra forma: Me.Modal=True o Me.Modal=False
Respuesta
en
Microsoft Access
y en 2 temas más
a
Problema al anexar datos a una tabla desde formulario
Vaya, veo que por hacer un copia-pega de tu código original, metí la pata. Este es el código bueno: Private Sub Comando20_Click() Dim rst As DAO.Recordset Set rst = Me.Subformulario_Consulta1.Form.RecordsetClone rst.MoveFirst Do Until rst.EOF ValorA...
Respuesta
en
Microsoft Access
y en 1 temas más
a
Botón para subformulario en formulario
Si Marca y Tipo son campos del subformulario, y el subformuario (ojo, el control subformulario, no el subformulario en sí) se llama subResultado, sería: ValorA = Me.subResultado.Form.MARCA ValorB = Me.subResultado.Form.TIPO Un saludo.
Respuesta
en
Microsoft Access
y en 2 temas más
a
Barra de progreso mientras carga informe Access
Estos enlaces, a ver si te resuelven el problema: http://jmmirallesortega.wixsite.com/accessyvba/ejemplos-y-descargas (ejemplo 24) https://sites.google.com/site/jjjt1973/ejemplos-access (ejemplo 91)...
Respuesta
en
Microsoft Access
y en 1 temas más
a
No abrir formulario sin datos
Puedes hacerlo de varias formas. Una sería usando DCount() en el botón, algo así: If DCount("*","NombreTabla/Consulta")>0 Then DoCmd.OpenForm "NombreFormulario" Else IF MsgBox("Todavía no hay datos que mostrar,¿Quieres añadirlos...
Respuesta
en
Microsoft Access
y en 2 temas más
a
Agregar un registro por VBA en Access
La forma más rápida es por medio de una SQL INSERT INTO en el código del botón: CurrentDb.Execute "INSERT INTO INVENTARIO(Fecha, Código, Movimiento, Cantidad) VALUES(#" & Format(Date,"mm/dd/yyyy") & "#,'" & Me.Codigo & "'," & Me. Cantidad &...
Respuesta
en
Microsoft Access
y en 2 temas más
a
MS Access - Comprobar Registros Duplicados en una tabla antes de crear un nuevo registro en ella.
Como idea de partida: Private Sub Boton_Check_Click() If DCount("*", "Table", "FullId='" & Me.txt_Supplier_ID & "-" & Me.txt_item_number & "'") > 0 Then MsgBox "Esa combinación ya existe" End If End Sub Cambia lo del msgbox por el mensaje que quieras...
Respuesta
en
Microsoft Access
y en 2 temas más
a
Acces creacion de formula SiInm
A la función SiInm siempre le tienes que pasar 3 parámetros: una comparación, un valor si es verdadero y otro si es falso. Si el 0 es "Apto": SiInm([RESULTADO] <0, "No Apto", "Apto") Si el 0 no es ni "Apto" ni "No apto": SiInm([RESULTADO] <0, "No...