J'ai actuellement:
Range("Z1").Interior.Color = RGB(255, 255, 255)
Mais cela efface les frontières des cellules. Au lieu de cela, j'aimerais simplement définir la transparence des cellules dans l'intervalle de 1,0. Les docs semblent suggérer qu'il n'existe pas (?).
Merci!
Range("Z1").Interior.ColorIndex = xlNone
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
Application.ScreenUpdating = False
' Clear the color of all the cells
Cells.Interior.ColorIndex = 0
With Target
' Highlight the entire row and column that contain the active cell
.EntireRow.Interior.ColorIndex = 8
.EntireColumn.Interior.ColorIndex = 8
End With
Application.ScreenUpdating = True
End Sub
Une approche simple serait peut-être (Symbol).(line or background)Color = -1 'Transparent
.