Error de compilación: Procedimiento demasiado largo

Preguntas y respuestas relacionadas

Macro para guardar archivo de excel en txt

Que tal con ayuda de ustedes cree una macro de la siguiente forma: Private Sub CommandButton1_Click() nbre = Format(Now, "dd-mm-yy hh mm ss") ruta = ThisWorkbook.Path ActiveWorkbook.SaveCopyAs ruta & "\" & nbre & ".xls" End Sub Pero al guardarlo es...
1 respuesta

Filtro en consulta con criterio de fecha

Tengo un problema en una consulta de Acess, tengo un formulario basado en una tabla y mediante una consulta tengo realizados varios filtros que funcionan perfectamente pero quiero agregar un criterio más sobre un campo fecha pero me da error En la...
3 respuestas

Dudas sobre formularios y msgbox al hacer consulta en una base de datos de Microsoft Access

Tengo un formulario y quiero que si busco un campo y no se encuentra me aparezca un msgbox en que diga que no se encuentra el registro. El código que he puesto es este: Dim stDocName As String Dim stLinkCriteria As String stDocName = "LICENCIAS" If...
1 respuesta

Buscar con cuadro de lista un registro

Necesito que busque un egistro depende del el valor de cuadro de lista pero me da error On Error Resume Next ' Buscar el registro que coincida con el control. Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[lista] = " &...
3 respuestas

Problema con FileDialog Access 2007

Estoy realizando una base de datos de clientes y he insertado en el registro de cada cliente una ruta de un archivo de imagen, para que se sobrecargue demasiado. El problema está al añadir un botón examinar, para elegir el archivo de imagen...
1 respuesta

Agregar dos funciones a esta macro

Estoy tratando de agregar a esta macro: Sub Borrar_celdas_Desbloqueadas() ActiveSheet.Protect Password:="1" Dim r As Range For Each r In Selection If r.Locked = False Then r.ClearContents Dim img As Shape On Error Resume Next For Each img In...
1 respuesta

¿Como puedo hacer el efecto lupa?

Necesito hacer el efecto lupa o zoom con letras en un applet Tengo que pasar el puntero del mouse con una forma circular g.drawOval(x-10, y-10,20,20); o rectangular, y las letras que entren dentro de ese circulo o rectangulo deben aumentar de tamaño....
1 respuesta

Copiar datos de formulario a un nuevo registro que usa el mismo formulario simulando mover el cliente de una habitación a otra

Tengo un control de habitaciones con un tablero principal donde cada botón de comando simula ser una habitación, al dar clic en cada una te abre un formulario para registrar los datos del cliente. Manejo 3 tablas relacionadas: Habitaciones, Registro...
1 respuesta

Se ha producido el error 3061 pocos parámetros se esperaba 1

Tengo la siguiente función definida en un Módulo en una Base de datos MS Access 2016, para actualizar el valor de un campo de tipo booleano de una tala: Function Actualiza_subcontrata(Exp As String, Valor As Boolean) Set DB = CurrentDb 'Actualiza el...
3 respuestas

Intercambio de datos entre tablas

A ver si me pueden echar una mano con algo que parece sencillo pero con mi escasa experiencia se me ha complicado y no se bien cómo resolverlo. Un amigo me pidió si no podía hacerle una base de datos sencilla para llevar el control de vehículos que...
2 respuestas
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas de los temas