Eduardo Pérez Fernández

Martha, interesante su pregunta esto tuve que hacerlo hace un tiempo cuando utilizaba Acccess como backend. Lo puede hacer con estas funciones manipulando los índices y ordenarlos, utilizo el método de la burbuja. Copie este código en un módulo...

Puede hacerlo de 2 formas, con SQL o con VBA. Supongamos que tu tabla se llama Registros y tiene estos campos: EmpleadoID HoraInicio → (ej. 01/04/2025 06:00:00) HoraFin → (ej. 01/04/2025 13:30:00) HorasExtra (que puede ser calculado o almacenado...

Le dejo el código mejorado Private Sub Form_Current() Dim RutaBase As String Dim RutaImagen As String ' Ruta base del proyecto RutaBase = Application.CurrentProject.Path & "\Tools\OTClientes\Informes\" ' Verificar que el TextBox con el nombre de la...

El error se debe a que FileSystemObject pertenece a la biblioteca Microsoft Scripting Runtime, y en Access de 64 bits puede ser necesario habilitar esta referencia manualmente o usar Late Binding para evitar problemas de compatibilidad. Solución 1:...

Por lo que menciona, el error 75 en VBA generalmente ocurre porque: La carpeta ya existe y el código intenta crearla de nuevo sin validarlo correctamente. El archivo que intenta copiar ya está en uso o bloqueado. No tiene permisos suficientes para...

Eduardo, Sharepoint no es una solución para un entorno multiusuario, en mi caso utilizo como backend PostgreSQL (es gratis), la base de datos está en un servidor en la nube y conecto a los usuarios desde Access a esta base de datos. No tiene por qué...

Si puede hacer con vba, debe crear un botón en tu formulario y usar este código VBA en el evento Click. Private Sub btnAbrirContrato_Click() Dim objWord As Object Dim docWord As Object Dim strRutaDoc As String Dim strFiltro As String ' Ruta del...

¡Sí, es totalmente posible y muy útil! Puede hacerlo con un botón en el formulario que actualice el campo "Renovación" sumándole 6 meses a todas las fechas que aparecen en la consulta. Estos son los pasos: Abra el formulario frm_prorroga en vista de...

Aquí hay un problema con la cantidad de columnas y valores. Estás insertando 8 valores, pero en INSERT INTO solo menciona 7 columnas. Si, por ejemplo, la columna adicional representa el IDOrdenTrabajo, la consulta corregida quedaría así: Private Sub...

Existen 2 formas 1. Con SQL Public Sub AgregarColumna() Dim db As DAO.Database Dim strSQL As String Dim NombreColumna As String ' Obtener el nombre de la columna desde el formulario NombreColumna = Me.NombreColumna.Text ' Asegurar que este control...