Actividad pública reciente
Ha valorado "Excelente" la respuesta
Macro con fórmula
La sintaxis para tu ejemplo es la siguiente: Sub formulas() Range("c1").Select nro = 3 ActiveCell.FormulaLocal = "=si(a1=" & nro & ";b1)" End Sub Sdos Elsa PD) Más ejemplos de fórmulas en manual 400MacrosPlus http://aplicaexcel.galeon.com/index.htm
Ha valorado "Excelente" la respuesta
Copiar solo el formato de la celda
Yo usaría esto: For i=2 to i=10 Cells(i,6).Select 'Columna F Select Case c Case 1 c.Interior.ColorIndex = 36 'crema Case 2 c.Interior.ColorIndex = 3 'rojo Case 3 c.Interior.ColorIndex = 34 'Celeste Case "a" c.Interior.ColorIndex = 4 'Verde Case "b"...
Ha empezado a seguir a 
Elsa Matilde
Elsa Matilde