kumbus

1 Crea un botón agregar en el encabezado del formulario y métele este código en su evento click Private Sub cmdAGREGAR_Click() TotalCaja = Me.total_caja DoCmd.GoToRecord , , acNewRec If IsNull(Me.caja_anterior) Then Me.caja_anterior = TotalCaja End...

Tienes que crear un formulario y en la parte encabezado o pie (no en el detalle) crear varios objetos imagen, por ejemplo 5 o los que quepan en la pantalla. Luego le metes las rutas creando un botón y en su evento onclick Imagen1.Picture =...

El Outlook no permite ciertas extensiones de adjuntos, conviértela en un zip antes de enviarla

Private Sub Form_Timer() If Hour(Now) = 12 Then MsgBox "HOLA, son las 12" End Sub

Necesitas otro recordset para añadir registros a la tabla nueva set re=currentdb.openrecordset("SELECT* FROM T_tipoalarma") do while not rs.eof re.addnew for Campos =0 to rs.fields.count-1 re(Campos)=rs(Campos) next re.update rs.movenext loop

Private Sub Save_record_Click() On Error GoTo Err_Save_record_Click if not isnull(CUADRO1) then DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 else msgbox "Faltan datos en " & CUADRO1, vbcritical endif Exit_Save_record_Click:...

Crea una consulta de agrupación, agrupando el código y convierte esa consulta en una tabla. SELECT registros.REGISTRO INTO tablanueva FROM registros GROUP BY registros.REGISTRO;

Si, enlazando las tablas de outlook con Access mediante el menú de Access Archivo: Obtener datos externos: Vincular tablas, tipo de archivo Outlook()

Me. Requery O me. Totalpedido. Requery En el evento Al activar registro

primero cuenta los registros de cada por ejemplo con esta consulta SELECT libros.REGISTRO, Count(tabla.REGISTRO) AS CuentaDeREGISTRO FROM tabla GROUP BY tabla.REGISTRO HAVING (((tabla.REGISTRO)="PCA")) OR (((libros.REGISTRO)="SI")); Luego si es un...