Ocultar columnas bajo condición en excel
Soy profesor y me encuentro creando una planilla que me facilite el análisis de mis estudiantes. Lo que necesito es que en la hoja "Puntajes" se oculten las columnas que en la fila 14 tengan el signo "-". Esto para que el ingreso de los datos sea más sencillo.
Aquí un link al archivo.
Esta sería la macro que necesitas. Estoy dejando un margen por si colocas más columnas.
Sub ocultaColumnas()
'x Elsamatilde
'recorre fila 14 ocultando las que contengan '-'
Sheets("PUNTAJES").Select
'rango de col: L a CQ
colini = 12
colfin = Range("DA14").End(xlToLeft).Column
For i = colini To colfin
If Cells(14, i).Value = "-" Then Cells(14, i).EntireColumn.Hidden = True
Next i
End SubSdos y no olvides valorar la respuesta (Excelente o buena) si el tema queda resuelto... sino comenta.
Muchas gracias por tu rápida respuesta. Me arroja errores (perdón si el error es mío, esto de VB es nuevo para mí):
Al bajar de (Sub ocultaColumnaS()) me dice: Se esperaba =.
Seguramente lo que me enviaste no es para copiarse directamente y debo cambiar algunos datos?
Copia la línea de color completa... parece que te falta el final =True
Sdos!
Aún me rechaza. Me odia. Ja ja
Tengo la macro probada y ejecutada en tu libro. Dejame un correo o escribime al que aparece en mi sitio y te lo envío mañana (ya es muy tarde aquí)
Sdos!
