ohmygood

Tienes el código y un ejemplo para bajarte en mi página web Laleyenda. Iespana. Es De todas formas te cuento como se haría: En el formulario, la caja de texto no la referencies a ningún campo, la dejas libre, y luego pones una sentencia de búsqueda...

La verdad es que hay muchos, pero claro, el cómo funcionan, vete a saber... No tiene por qué ser tan complicado. http://www.google.com/search?q=%2Bocx+%2Brtf+%2Btext+%2Baccess&ie=UTF8&oe=UTF8&hl=es&lr= Suerte.

El camino que tomaría yo, sería éste: Si lo hago leyendo todos los registros (string) y comprobando sus 4 primeras posiciones = año_actual, sería lentísimo a la hora de generar el número en cuestión. Pero con una pequeña salvedad, no leas todos los...

Puedes hacerlo por código: ' se está ejecutando excel ? On Error Resume Next Set oXLS = GetObject(, "excel.application") If Err.Number <> 0 Then Err.Clear Set oXLS = CreateObject("excel.application") End If On Error GoTo error_1 ' abrir el libro y...

Si abres la consulta directamente desde la ventana de la base de datos, creo que no puedes. Si tienes un formulario basado en una consulta sí que puedes con el siguiente código if forms.recordset.recordcount = 0 then msgbox "no hay registros" else...

Seguro que hay más formas de hacerlo, pero yo lo haría así: - Abriría la tabla por código que contuviera los datos que necesitamos. dim db as database dim rrset as object set db = currentdb set rrset = db.openrecordset("select * from nombre_tabla...

Hay dos causas que te pueden dar ese mensaje, apuesto por la segunda: 1º Access no está bien registrado en el ordenador. Solución: Cierra todos los posibles programas de office abiertos. Ahora vamos a Inicio / Buscar / Archivos o carpetas. Buscamos...

A ver, quieres pasar de autonumérico a numérico, ¿verdad? Primero tienes que quitar todas las relaciones del campo autonumérico. Luego cambiar el tipo del campo a numérico, y luego si te interesa, lógicamente, poner otra vez las relaciones.

Prueba a poner Formularios![NombreFormulario].[NombreCampo]

Pon el siguiente código en el evento EXIT del cuadro combinado: If VarType(Me.Cuadro_combinado20.Value) = vbNull Then MsgBox "Debe seleccionar un elemento de la lista." Cancel = True End If Debes cambiar cuadro_combinado20 por el nombre de tu cuadro...