Sector, orientado a las planillas de cálculos.
Excel, aplicaciones para todos, es un grupo de facebook con muchisimas app con macros totalmente libres y gratis.
Son de codigo abierto, se pueden usar y/o reformar a sus nesecidades.
Link www.facebook.com/groups/Excel.Aplicaciones.Para.Todos/
No se pueden publicar directamente en la web, ya que son app muy elaboradas, y con macros, y las mismas tienen un costo para publicarlas en esta web, y como ya saben, esta web es sin fines de lucro, asi que por tal motivo, todas las aplicaciones excel creadas por mi, estaran en ese grupo...
Leer más: https://stricker-ruben-dario.webnode.es/planillas-de-calculos/
Ejemplos de Macros
Cambiar Color Condicional
Código Macro
'Este código Cambia de color a los numeros de las celdas cuyo contenido sea mayor o igual a 5...
Sub Cambiar_Color_Condicion()
Dim Celda As Range
For Each Celda In Selection.Cells
If Celda.Value >= 5 Then...
———
Cambiar Color de Forma (shape) 1
Código Macro
'Este código es para cambiar el color de una forma (shape)...
'Macro para cambiar el color de una forma(shape)
Sub Color_Formas1()
'Cambia el color de la forma 1 de la hoja activa
ActiveSheet.Shapes(1).Select
...
———
Cambiar Color de Forma (shape) 2
Código Macro
'Este código es para cambiar el color de una forma (shape)...
Sub Color_Formas2()
Dim Formas As Shape
Set Formas = ActiveSheet.Shapes(1)
'Cambia el color y el tamaño de la forma
With Formas
...
———
Cambiar Color Fondo Según Condición 1
Código Macro
'Este código es para cambiar el color de fonde de la celda si cumple alguna condición...
'(Trabaja sobre una columna objetivo o data)
Sub Cambiar_Color_Celda1()
'Uso de un ciclo para cambiar el color de una celda que cumplan cierta condición
Dim UltimaFila As...
———
Cambiar Color Fondo Según Condición 2
Código Macro
'Este código es para cambiar el color de fonde de la celda si cumple alguna condición...
'(Trabaja sobre una columna objetivo o dada)
Sub Cambiar_Color_Celda2()
'Uso de un ciclo para cambiar el color de una celda que cumpla cierta condición
Dim UltimaFila As...
———
Cambiar Color Fondo Según Condición 3
Código Macro
'Este código es para cambiar el color de fonde de la celda si cumple alguna condición...
'(Trabaja sobre una selección dada de celdas)
Sub Cambiar_Color_Celda3()
'Cambia el fondo de la celda si cumpla la condición dada
Dim Celda As Range
...
———
Cambiar Formula a Datos
Código Macro
'Este código transforma la selección dada a valores, ejemplo, una formula la cambia a datos...
Sub Cambiar_Formula_Datos()
Dim Celda As Range
For Each Celda In Selection
If Celda.HasFormula Then
...
———
Cambiar Tamaño Rango Seleccionado
Código Macro
'Este código Cambiar el Tamaño del Rango Seleccionado ...
'Cambiar el tamaño de un rango seleccionado por otro establecido.
'La propiedad Resize permite cambiar el tamaño de un rango basado en la localización de la celda activa. Se pueden crear nuevos rangos si es...
———
Celdas con Fórmula
Código Macro
'Este código es para seleccionar celdas con fórmulas...
Sub Celdas_Especiales_Formulas()
Selection.SpecialCells(xlCellTypeFormulas).Select
Selection.Interior.ColorIndex = 36
End Sub
Para agregar un macro, deberá abrir el editor de...
———
Celdas en Blanco
Código Macro
'Este código es para seleccionar celdas en blanco...
Sub Celdas_Especiales_Blanco()
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.Interior.ColorIndex = 36
End Sub
Para agregar un macro, deberá abrir el editor de VBA en...
