Vamos a sumar y contar según el color de la fuente de un texto. En otra entrada anterior de este Blog ya vimos cómo contar según el color de fondo de las celdas. Es la siguiente:
Ahora vamos a programar una pequeña función en VBA que nos da el código de color según una codificación de colores que va entre 1 y 56. Esto supone que no se distingue entre colores parecidos.
La función programada como macro en Excel es la siguiente.
Function ColorTinta(celda As Range) As Byte ColorTinta = celda.Font.ColorIndex End Function
Estiimado Adolfo he descargado el archivo correspondiente a sumar segun color de tinta pero aparrentemente esta vacio. pues no encuentro la macro y las hojas estan en blanco.
ResponderEliminarMe ocurre lo mismo, aparentemente vacío y sin macro.
ResponderEliminarSaludos,
Porque el codigo no empieza con
ResponderEliminarsub()
Porque el codigo no empieza con
ResponderEliminarsub()
Porque el codigo no empieza con
ResponderEliminarsub()
Hola Ignacio. Hola Miguel.
ResponderEliminarYa está solucionado lo del archivo de Excel. Ahora ya está correcto. Gracias por avisar.
Un saludo.
Hola Oscar.
ResponderEliminarLas macros comienzan por SUB y finalizan con END SUB.
Las funciones programadas por el usuario, o también se las llama Funciones definidas por el usuario comienzan por la palabra función en inglés: FUNCTION y finalizan por END FUNCTION. También se programan en un Módulo al igual que las macros normales.
Un saludo.
Buen día mi estimadísimo adolfo:
ResponderEliminarMuy interesante su ejercicio y de mucha aportación para nosostros.
Saludos desde México.