Asignar Valoreso formulas a Celdas

Código Macro

'Este código asigna un valor a la celda seleccionada...

Sub Asignar_Valor_OK()
    ActiveCell.Value = "OK"
End Sub
 

'Este código asigna un valor a la celda especificada...

Sub Asignar_Valor_Especifico()
    Range("A1").Value = "XXX"
End Sub
 
'Este código asigna un valor a un conjunto de celdas especificadas...
 
Sub Asignar_Valor_Varias_celdas()
    Range("A1:C10").Value = "Celda"
End Sub
 
'Este código asigna una formula a una celda especificada...
 
Sub Asignar_Formula()
    Range("A1").FormulaLocal = Rnd()
    Range("A2").FormulaLocal = Rnd()
    Range("A3").FormulaLocal = Rnd()
    Range("A4").FormulaLocal = Rnd()
    Range("A5").FormulaLocal = Rnd()
End Sub
 

Para agregar un macro, deberá abrir el editor de VBA en el libro de Excel abierto al cual desea agregarlo, mantener apretado la tecla "ALT + F11", luego seleccionar la solapa "INSERTAR", y desde ahí elegir "MODULO".

Y en el módulo pegar el código completo del macro, para luego poder usarlo.

Para Usar el macro, volver a la hoja de Excel de la siguiente manera, mantener apretado la tecla "ALT + F11", o minimizando o cerrando el editor de VBA.

Y en la hoja de cálculo insertar una FORMA o IMAGEN, luego hacerle clic derecho a la misma y seleccionar, "ASIGNAR MACRO", y elegir el macro deseado que de antemano hemos copiado.

Recuerde que el libro de Excel deberá guardarlo como "LIBRO DE EXCEL HABILITADO PARA MACROS"...