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

• #42318 Delila_1 veterán Sutyi73 #42316

  Új Válasz 2019-11-30 12:11:50 #42318

  Ú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 #42316 üzenetére

  Laphoz rendelt makróval megoldható.

  Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = "p" Then Target.Borders(xlDiagonalUp).LineStyle = xlContinuous
If Target.Value = "o" Then Target.Borders(xlDiagonalDown).LineStyle = xlContinuous
End Sub

  Azért írtam meg "o" bevitelére is, mert nem tudom, melyik irányba szeretnéd dönteni az átlót. "p" esetében /, "o"-nál \.

• #42317 ny.janos tag Sutyi73 #42316

  Új Válasz 2019-11-30 11:25:17 #42317

  Ú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

  

  ny.janos

  tag

  válasz Sutyi73 #42316 üzenetére

  Szia!
  Mivel a feltételes formázásnál a szegélyek fülön az átlós szegély gomb inaktív (nem választható), így feltételezhetően erre nincs mód.
  Feltételezem, hogy ez csak makróval oldható meg.

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