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

• #40506 Pakliman tag RedHarlow #40505

  Új Válasz 2019-03-22 07:14:55 #40506

  Ú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

  

  Pakliman

  tag

  válasz RedHarlow #40505 üzenetére

  A legegyszerűbb a feltételes formázás.
  Az "A" oszlopra fixen is megcsinálhatod, de ha van rá esély, hogy bárki is hozzányúlhat és elcseszheti, akkor inkább kóddal kell megoldani.
  Ezt tedd be a makróba.

  With Columns(1) 'Az A oszlopra vonatkozóan
.FormatConditions.Delete 'Töröljük az esetlegesen már meglévő formázást
.FormatConditions.Add Type:=xlExpression, Formula1:="=INDIREKT(CÍM(SOR();3))=""X""" 'Létrehozzuk a szükségeset
.FormatConditions(1).Interior.Color = vbGreen 'Beállítjuk hozzá a színt
End With

  Vagy a For sor = 1 To sor_u elé,
  vagy a Next sor után.

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