Posicion Y Tramas

14/09/2009 - 14:30 por Miguel | Informe spam
Hola Amigos:

tengo el siguiente codigo para saber en posicion estoy
dentro de la planilla:

Sub Worksheet_Selectionchange(ByVal target As Range)
Cells.Interior.ColorIndex = 0
ActiveCell.EntireRow.Interior.ColorIndex = 15
' ActiveCell.EntireColumn.Interior.ColorIndex = 15
End Sub

Ahora si lo aplico a una planilla que tenga marcado con tramas con colores
algun/os casillero, deja todas las celdas en su trama de color blanco.
Como deberia ser el codigo para que sepa donde estoy posicionado pero sin
cambiar los colores originales de las tramas de celdas ?.
Gracias y Saludos
 

Leer las respuestas

#1 Cacho
14/09/2009 - 20:34 | Informe spam
Hola! Miguel.
Intenta darle a la fila que seleccionas un formato condicional, más ó menos
así:

Sub Worksheet_Selectionchange(ByVal target As Range)
Cells.FormatConditions.Delete
With ActiveCell.EntireRow
.FormatConditions.Add Type:=xlExpression, Formula1:="= 1=1"
.FormatConditions(1).Interior.ColorIndex = 15
End With
End Sub

Comenta si te ha servido, ¿si?

Saludos, Cacho.

Preguntas similares