09/03/2010, 10:28
|
| | | Fecha de Ingreso: febrero-2010
Mensajes: 16
Antigüedad: 14 años, 2 meses Puntos: 0 | |
 Respuesta: ¿Cómo definir formato de celda en Excel desde VB 6.0?
Encontre la solucion, gracias de todos modos
Sheets("sheet1").Range("a10").Select
colorin = "0"
Do
colorin = colorin + 1
If Selection.Interior.ColorIndex = colorin Then
Range("a8").FormulaR1C1 = colorin
End If
Range("a1").FormulaR1C1 = colorin
Loop While Selection.Interior.ColorIndex <> colorin |