James Bond

Busca mapas mentales y que tus alumnos preparen uno personalizado, por ejemplo uno puede dibujar un árbol y cada rama es una fecha importante, otro puede dibujar una avenida donde cada calle es en fecha que recordar o un palacio donde cada habitación...

Prueba esta macro, te copiara a la hoja 2 en un sola pasada todos los datos de quienes no tengan 8 materias, lo único que tienes que cambiar son estas dos líneas al principio de la macro para adaptarla a tus datos Set DATOS =...

y si cambias la instruccion activecell.interior.colorindex=5, esto deberia cambiar el fondo de la celda donde te pongas.

¿Trataste con esto? if lista>0 then Me.Cbo_codigo.AddItem Lista asi excluyes los valores =0

Usa esta macro, cópiala y pégala en el modulo thisworkbook de VBA, busca solo en las columna A las celdas que tengan datos si encuentra un numero o un espacio vacío al momento de querer grabar la información no te dejara. Private Sub...

prueba estas 2 macros funcionan asi, ambas seleccionan los datos una de manera fija ("a1:h1") y otra de manera dinamica partiendo de A1 y terminado hasta la ultima celda y columna con datos que esten consecutivas y le da un nombre a esa region que...

Probé la instrucción y la hice un poco más corta y si funciona Sub borrar() Sheets("registro").Range("C6, C7, C13, E11, B19:E22").ClearContents End Sub que numero de error te da?.

Prueba con esta macro y esta es la mac Sub colorear() Set datos = Range("a1").CurrentRegion With datos f = .Columns(1) For i = 1 To .Rows.Count xcolor = f(i, 1) If IsEmpty(xcolor) Then .Cells(i, 2).Font.ColorIndex = 3 .Cells(i, 2).Interior.ColorIndex...

Intentaste convertir el numero de serie a fecha con la función cdate por ejemplo: ¿textbox1.text=cdate(textbox.text)? O bien usar una variable fecha Ejemplo: dia=cdate(range(x)) textbox1.text=dia

Crea una tabla así, seleccionas todos los datos, ye vas a insertar, tabla, seleccionas la tabla tiene encabezados y listo ahora en ranking pones la siguiente fórmula y listo ya tienes tu fórmula =Tabla1[[#Esta fila],[materias...