私は現在持っています:
Range("Z1").Interior.Color = RGB(255, 255, 255)
しかし、これはセルの境界を一掃します。代わりに、範囲のセルの透明度を1.0に設定したいだけです。 ドキュメント 存在しないことを示唆しているようです(?)。
ありがとう!
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
おそらく、単純なアプローチは(Symbol).(line or background)Color = -1 'Transparent
。