excel programa:
Private Sub WorkSheet_SelectionChange(ByVal Target As Excel.Range)
Cells.Interior.ColorIndex = xlNone
With ActiveCell
.EntireRow.Interior.ColorIndex = 35
.EntireColumn.Interior.ColorIndex = 36
End With
End Sub
No hay comentarios.:
Publicar un comentario