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

• #11085 zsotesz81 senior tag

  Új Válasz 2011-08-16 12:19:01 #11085

  Ú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

  

  zsotesz81

  senior tag

  Sziasztok

  Egy kis segítség kéne. Van egy táblám aminek a G és H oszlopában az alábbi értékek lehetnek: low, medium, high. Azt már megcsináltam, hogy értéktől függően adjon a cellának háttérszínt. A gondom az, ha bármely más cellába beírok valamit (ami nem a G vagy H oszlopban van) akkor annak a hátterét visszaállítja fehérre. Ez azért gond mert a táblázatom alapszíne szürke. Tehát azt szeretném valahogy megoldani, hogyha valamelyik cellába beírok valamit akkor maradjon meg a szürke háttér. Ha töröltem egy cella tartalmát akkor is visszaváltott fehérre, de ezt még sikerült orvosolni.
  Ezt írtam eddig:

  Private Sub Worksheet_Change(ByVal Target As Range)

  Dim icolor As Integer

  If Target = "low" Then icolor = 35

  If Target = "medium" Then icolor = 36

  If Target = "high" Then icolor = 40

  If Target = "" Then icolor = 15

  Target.Interior.ColorIndex = icolor

  End Sub
  A 15 volna a szürke color indexe.

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