Respuesta
en
Microsoft Access
y en 3 temas más
a
DLookUp en VBA con un criterio de texto
Otra sintaxis válida para el criterio sería: PaginasDiaPendiente = DLookup("[PaginasDia]", "[CPaginasDiaPorEstadoHastaFinalAñoDefinitivo]", "[Estado]='Pendiente'")
Respuesta
en
Microsoft Access
y en 1 temas más
a
Access: Problema al vincular formulario con subformulario
Prueba a poner, en el evento "después de actualizar" de tu marco de opciones el siguiente código: Me. NombreSubform. Requery O Me.NombreSubform.Form.Requery Donde NombreSubform lo tienes que cambiar por el nombre del control que contiene el tu...
Respuesta
en
Microsoft Access
y en 3 temas más
a
Un problema al mostrar el ribbon
La pestaña Archivo creo que solo la puedes ocultar completamente si ocultas el ribbon (no lo puedo confirmar ahora mismo porque solo tengo acceso a un 2007 en el pc del trabajo). Si habilitas el ribbon, la tendrás activa. Algo aprecido sucede con la...
Respuesta
en
Visual Basic
y en 1 temas más
a
¿Se puede ordenar un número largo del 0 al 9 en Access o en VBA?
A pesar de que ya tienes una propuesta de Jacinto, yo te preparé otro ejemplo parecido, para que tengas opciones: http://www.filebig.net/files/Wndcb72YXV En este ejemplo además puedes elegir si ordenar la cadena numérica de 1 en 1, de 2 en 2 o de 3...
Respuesta
en
Microsoft Access
y en 1 temas más
a
Recorrer en vertical los registros de un campo, para comprobar su valor y...
Lo primero que se me ocurre es que en el evento "después de actualizar" de Selección, pongas: If Me.Selección=-1 Then CurrentDb.Execute "UPDATE NombreTabla SET Seleccion=0 WHERE Articulo<>" Me.Articulo End If Y si articulo no fuera un campo numérico...
Respuesta
en
Visual Basic
y en 1 temas más
a
Quiero hacer saltar un Msgbox.
Pues por ejemplo, en el evento "Después de actualizar" de ese cuadro de texto pones: If Me.NombreCuadroTexto="mundo" then Msgbox "Has escrito: 'mundo'"
Respuesta
en
Microsoft Access
y en 3 temas más
a
Eliminar #Error en Access al ejecutar codigo VBA
Si la función la declaras para que devuelva un número (Public Function WorkingDays2(... As Integer), no le puedes decir que te devuelva un "texto" (WorkingDays2 = " ") Yo probaría primero a cambiar esa línea por ésta otra: WorkingDays2 = 0 Y si no te...
Respuesta
en
Visual Basic
y en 3 temas más
a
Insertar un valor en un campo mediante VBA
Si usas una SQL de tipo INSERT te añadirá un registro nuevo siempre cada vez que se ejecute, por lo que no tiene sentido (ni se puede) usar un WHERE en ella. Si lo que quieres es actualizar un registro existente debes usar una SQL de tipo UPDATE, en...
Respuesta
en
Microsoft Access
y en 1 temas más
a
Refrescar un formulario cuando pinchas en un campo si/no
¿Probaste a poner, simplemente: Me. Requery? Y yo te sugeriría hacerlo en "Después de actualizar", y no en "al hacer clic"
Respuesta
en
Microsoft Access
y en 2 temas más
a
Cancelar impresión en DoCmd.RunCommand acCmdPrintSelection
Si solo quieres anular el mensaje de error (ese y cualquier otro que te pueda saltar), una opción con menos líneas de código sería: On error Resume Next DoCmd. OpenReport "Amigos", acViewPreview, "", "", acNormal DoCmd. RunCommand acCmdPrintSelection...