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

Preguntas similare

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.
Respuesta Responder a este mensaje
#2 AnSanVal
14/09/2009 - 20:57 | Informe spam
Para no modificar la hoja, ¿No te bastaría con p.e. una flecha "gorda" que te señale la celda?



Podria ser con un código similar a:




Private Sub Worksheet_SelectionChange(ByVal Target As Range)

ActiveSheet.Shapes("miFlecha").Left = Target.Left

ActiveSheet.Shapes("miFlecha").Top = Target.Top + Target.Height

End Sub





Saludos: Antonio.

*******************************

"Miguel" escribió en el mensaje news:
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


Respuesta Responder a este mensaje
#3 miguel
14/09/2009 - 21:36 | Informe spam
Hola Cacho, funciono excelente, gracias.
Saludos

"Miguel" escribió en el mensaje
news:
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


Respuesta Responder a este mensaje
#4 Héctor Miguel
15/09/2009 - 02:05 | Informe spam
hola, chicos !

miguel escribio en el mensaje ...
Hola Cacho, funciono excelente, gracias...



no se si sea importante, pero el codigo sugerido ELIMINA constantemente todos los formatos condicionales
(con las -posibles- implicaciones que esto pudiera tener) -???-

saludos,
hector.
Respuesta Responder a este mensaje
#5 Miguel
15/09/2009 - 04:14 | Informe spam
Gracias Antonio por tu respuesta, pegue el codigo que pusite pero me marca
error me imagino que sera por "Micursor".
Gracias nuevamente y Saludos

"Miguel" escribió en el mensaje de
noticias:
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


Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida