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

• #22638 Delila_1 veterán lappy #22637

  Új Válasz 2014-07-28 12:44:16 #22638

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

  Nem lehet, a 2003-asban max 3 feltétel adható meg.

  Helyette egy, a laphoz rendelt makróval megoldható.

  Private Sub Worksheet_Change(ByVal Target As Range)
  Select Case Target
  Case "K"
  Range(Target.Address).Interior.Color = vbBlue
  Case "P"
  Range(Target.Address).Interior.Color = vbRed
  Case "S"
  Range(Target.Address).Interior.Color = vbYellow
  Case "Z"
  Range(Target.Address).Interior.Color = vbGreen
  End Select
  End Sub

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