Julián González Cabarcos

Supongamos que los campos se llaman Completo y Último. Te aconsejaría que lo hicieras en Código. En el evento Después de actualizar del cuadro de texto Completo, crea un procedimiento de evento y entre Private Sub y End sub Ultimo=right([completo],1)...

Si bien no lo he entendido del todo, te digo lo que haría. En el evento Antes de actualizar del cuadro de texto del formulario donde escribes la fecha, al que llamaremos Fecha(¡ Que original el nombre!) If dcount("fecha","nombre de la...

Supongo que te refieres al texto Private Sub Form_Open(Cancel As Integer) For Each Control In Form.Controls If Control.ControlType = acTextBox Or Control.ControlType = acLabel Then Control.TextAlign = 2 End If Next End Sub

Supongamos que en un formulario tienes un cuadro de texto Fecha con una. Pon otro cuadro de texto y en sus origen del control pon =Format([fecha];"ee") Si no funciona, tendrás que comprobar las referencias en el editor de VB

Si cuando un usuario ingresa en la base, guardas ese hecho en una tabla, ala que llamaremos Registro, en el evento Al abrir de cada formulario puedes poner algo así como Select case Dlast("Usuario","Registro") case is="Pepe" boton1.enabled=false...

Si lo haces con código puedes poner Docmd.setwarnings false docmd.runsql"insert into tabla1 select.....from tabla2"

Voy a intentar explicarme: Hasta donde yo sé 1º Los campos OLE son una mierda. La propia empresa Microsoft dice que para "activarlos" hay que hacer doble clic sobre su icono. Un usuario de Microsoft Visual Basic para Aplicaciones puede incrustar...

For Each Control In Form.Controls If Control.ControlType = acTextBox or control.controltype=acCombobox Then Control.Value = "" End If Next

Sin haberlo entendido bien, puedes poner en el evento Al abrir del segundo formulario If currentproject.allforms("Formulario1").isloaded then if forms!formulario1.id=.... then form.recordsource="select * from Taltas where.. End if End if Es decir,...

Para hacerlo bien es algo más complicado, pero si sólo quieres que se cierre, ponle algún formulario como formulario de inicio(Archivo-Opciones-Base de datos actual) y en el evento Al cargar o Al abrir pon If date>=#02/02/2018# then Msgbox"Tararí que...