Elsa Matilde

Esta macro te servirá. Ajusta la ubicación de los datos del resultado. En mi ejemplo de la imagen la hoja se llama Consulta y los resultados se ubican a partir de D2. Sub BUSCAR_DATO() 'x Elsamatilde Set hoc = Sheets("Consulta") dato = [C2] 'ajustar...

No puedo responderte mientras tenga una consulta abierta aún... sin valorar. Completa el trámite anterior y con mucho gusto te acercaré el código para permisos. Considera que tenemos diferentes horarios y disponibilidad de tiempos ;(

Te podría enviar un código de ejemplo... pero si eres nuevo en esto de la programación, ¿Podrás adaptarlo a tu libro? Tampoco me quedó muy claro si al seleccionar un código de un listbox debe volcar los campos del resto de sus columnas a los textbox...

Si con que se intente modificar más de una vez en alguna celda ya será suficiente para bloquear todo el rango, solo necesitas un contador en una celda auxiliar, no todo un rango. Por ej: [I5] = [I5]+1 que es lo mismo que escribir: Range("I5") =...

No me quedó clara la consulta. Si querés colocar un botón en el formulario para buscar ¿una ruta, un archivo? ¿Y qué hay en el textbox? Por favor aclara un poco más y si es posible con imagen de tu formulario marcando el contenido de ese textbox que...

Te dejo otra propuesta, sirve tanto para una tabla ordenada como no. Lo que hace es guardar en una variable x el nro de la fila encontrada o la primer fila libre si no encuentra la fecha. Sub BUSCA_FECHA() 'x Elsamatilde Set busco =...

Hay que tener algo de cuidado al usar CurrentRegion. Es útil para conocer el rango de una tabla de datos y la cantidad de filas y columnas que contiene. Pero no es la mejor instrucción para encontrar la primer celda libre. Mira la siguiente imagen:...

Respuesta enviada en esta entrada: Cambiar el color en un label (semaforo). Excel VBA Sdos y no olvides valorar las respuestas. Elsa

Esto se puede resolver seleccionando o no la hoja. Caso 1: Seleccionando la hoja que se elige desde el Combo Private Sub CommandButton1_Click() s = TextBox1.Value Sheets(Combobox1.value).Select ListBox1.ColumnCount = 4 'a partir de aquí sigue tu...

No será fácil que se te acerque una solución sin tener alguna idea de cómo es tu hoja de datos ni cómo es tu formulario de búsqueda. Te invito a mirar los videos de mi canal que tratan el tema de las búsquedas (videos 29, 25 y otros anteriores). Si...