Ich habe momentan:
Range("Z1").Interior.Color = RGB(255, 255, 255)
Dies löscht jedoch die Grenzen der Zellen. Stattdessen möchte ich die Transparenz der Zellen im Bereich auf 1,0 setzen. Die Dokumente scheinen darauf hinzudeuten, dass es nicht existiert (?).
Vielen Dank!
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
Ein einfacher Ansatz wäre vielleicht (Symbol).(line or background)Color = -1 'Transparent
.