Macro para cambiar el color de una celda

Cómo sería el código de una macro para enviarle como parámetro la celda y el color al que debe cambiar la celda.

1 Respuesta

Respuesta
1

Te anexo 2 macros, la primera con el ejemplo para llamar a la segunda macro; y la segunda macro para cambiar el color de la celda.

Sub Principal()
'Por.Dante Amor
    Call PonerColor("D4", 6)
End Sub
Sub PonerColor(celda, color)
'Por.Dante Amor
    Range(celda).Interior.ColorIndex = color 'Pinto de gris
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas