Új hozzászólás Aktív témák

• #42326 Delila_1 veterán Sutyi73 #42324

  Új Válasz 2019-12-01 13:46:37 #42326

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz Sutyi73 #42324 üzenetére

  Private Sub Worksheet_Change(ByVal Target As Range)
If Target = "p" Then
With Target.Borders(xlDiagonalUp)
.ColorIndex = 3
.Weight = xlMedium
End With
End If
End Sub

Új hozzászólás Aktív témák