Elsa Matilde

Te muestro un ejemplo muy sencillo con 2 controles ListBox: uno se alimenta con la propiedad RowSource y el otro recorriendo la hoja de datos. Por supuesto que todo el código es de ejemplo, mejorable. Es para que observes la diferencia al momento de...

Las 2 veces que recibí un caso así, fueron por la misma causa que a continuación comento. Quizás también esté pasando algo similar en tu libro. En los 2 casos, los libros tenían celdas con objetos (botones, cartelitos, controles tipo checkbox, etc)....

Me parece que sería más fácil si primero seleccionas el rango mayor y lo coloreas con el gris de fondo. Luego selecciona 1 celda de azul, y manteniendo presionada la tecla CTRL vas seleccionando todas las que deben colorearse de azul. Le asignas el...

Te dejo una fórmula para colocarla en I13, ya que no indicaste dónde la colocarás. Avisame si necesitas ayuda para acomodarla en otra celda. =SUMAR.SI($C$2:$C$7;F13;$J$2:$J$7) Atención con los signos $ que permiten que ahora arrastres esta fórmula al...

La función BUSCARV tiene 4 argumentos. El 3ro, que dejaste en 2 es el que indica qué columna debe devolver. Por eso está bien para los DNI. Para la col CARGO, debes reemplazar el 2 por 3 y también el rango: =BUSCARV(B2;Tabla5[[Personal]:[CARGO]];3;0)

Lo más habitual es encontrar como solución esta instrucción: If Not IsDate(TextBox2) Then MsgBox "Error en el dato" Pero así, también si ingresas una hora te considerará un dato válido. Si quieres forzar este tipo de formato, puedes utilizar esta...

Mereces el premio a la perseverancia ;) A la macro que te envié le agregué la instrucción para devolverte también el nombre de la hoja, tal como se observa en la siguiente imagen. Ahora te queda adaptarla a tu modelo. Sub solicitaRango() 'x...

Pensé en enviarte una macro de ejemplo con un InputBox, utilizando el argumento Type en 8. Veo que ya te acercaste bastante... muy bien! Te acabo de dejar la macro de ejemplo en tu nueva consulta.

Estabas bastante cerca. Te dejo una macro con el InputBox que te devuelve los 2 campos: Sub solicitaRango() 'x Elsamatilde Dim rango As Range, libro As String Dim miLibro As Workbook, miHoja As Worksheet Set miLibro = ActiveWorkbook Set miHoja =...

Reemplazá tus instrucciones a partir de la línea del comentario, por las que te dejo a continuación: 'recorro la ultima fila con datos ... a partir de aquí ultima_fila = Worksheets(b).Range("a" & Rows.Count).End(xlUp).Row 'los datos que necesito...