Sveinbjorn El Rojo

Hay varias formas: 1º/ usar el modelo WHS, poniendo en el código de tu botón: CreateObject("Shell.Application").Namespace(0).ParseName(Me.Archivo).InvokeVerb ("Print") 2º/ Usando APIs, en concreto ShellExecute: Private Declare Function ShellExecute...

Tendrás que usar un condicional para analizar si el campo tiene o no valor y actuar en consecuencia. Por ejemplo, si los cálculos los haces por código: If Nz(Me.Costes;-3.14)=-3.14 Then Me.diferencial=Null Else Me.Diferencial=Me.Importe-Me.Costes...

Para responderte a la primera pregunta: ese es el comportamiento normal de cualquier formulario (aunque si no es un formulario contínuo no lo aprecies). La única forma de evitarlo es modificar su propiedad "permitir agregar" a No, ya sea en las...

Prueba así: CurrentDb.Execute "Update AYUNTAMIENTOS SET Tipo_Particion ='" & Me.PartNueva & "' WHERE [AYUNTAMIENTOS].[Numero_escudo] = " & Me.Numero_escudo suponiendo que el nuevo valor lo tengas en un cuadro de texto del formulario en el que...

Me parece que lo que quieres hacer y lo que estás intentando hacer son dos cosas distintas... En una consulta de actualización no puedes actualizar un campo calculado. Las consultas de actualización sirven para modificar datos de campos ya existentes...

Si te tuviera que aconsejar, te diría que no guardases el stock del producto en la tabla, pues al ser un dato "volátil" te evitas tener que pensar en programar todas las posibles situaciones que le afecten. En mi opinión, es mejor calcularlo cada vez...

Si quieres "bloquear" el registro, debes poner el código en el evento "al activar registro" del formulario, para que no dependas de entrar o clicar en el campo. Además, tienes que ponerlo también en el evento "después de actualizar" de tu casilla...

Salvo que trabajes con formularios "independientes" no es necesario programar nada para guardar los datos, pero, si aún así lo quieres hacer, así consigues las dos cosas que buscas: 1º/ Por código VBA: en el evento "Al hacer clic" del botón: DoCmd....

No te voy a dar la solución, sino unas pistas para que lo consigas tu mismo: Con la función Instr() puedes averiguar en qué posición está una cadena o caracter, en tu caso la coma. Con las funciones Left() y Right() puedes extraer x caracteres a...

Hazlo así: Dim rst As DAO.Recordset Set rst = Me.RecordsetClone rst.MoveFirst Do Until rst.EOF DoCmd.OpenReport "rpt puntuacionesindividuales todos", acPreview, , "Email='" & rst("Email") & "'" DoCmd.OutputTo acOutputReport, "rpt...