Stránka 1 z 1

Podmíněné Formátování celého řádku

Napsal: 17 dub 2009 11:59
od jikom
Dobrý den

Potreboval bych v celem liste nastavit podminene formatovani pro celi radek v zavislosti na urcite bunce.

Přiklad:
ve sloupci mam hodnoty:
OK
Storno
V reseni
atd

a potrebuji aby radek ktery ma v danem sloupci "OK" aby byl zeleny atd

Pokud by to slo automatickym makrem byl bych radeji. Podminene formatovani zbytecne zvetsuje soubor.

Dekuji Jirka

Re: Podmíněné Formátování celého řádku  Vyřešeno

Napsal: 17 dub 2009 12:10
od mike007
Vítej na Pc-help

Označ řádky, jdi do podmíněného formátování a tam nastav tuto podmínku:

Obrázek

Re: Podmíněné Formátování celého řádku

Napsal: 17 dub 2009 12:27
od jikom
Funguje děkuji moc

Re: Podmíněné Formátování celého řádku

Napsal: 17 dub 2009 12:47
od navstevnik
Pozadovana procedura VBA (v editoru VBA - Alt+F11 - vloz do modulu prislusneho listu):

Kód: Vybrat vše

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
  Dim Radek As Range, IntClr As Byte
  If Target.Column <> 1 Then Exit Sub
  Set Radek = Target.Resize(Target.Rows.Count, Cells.SpecialCells(xlLastCell).Column)
  ' kdyz Del pro vice bunek
  If Target.Count > 1 Then Set Target = Target.Resize(1, 1)
  Select Case Target.Value
    Case "OK"
      IntClr = 4
    Case "Storno"
      IntClr = 3
    Case "V reseni"
      IntClr = 6
      ' dalsi
    Case Else
      IntClr = 0
  End Select
  Radek.Interior.ColorIndex = IntClr
End Sub

Re: Podmíněné Formátování celého řádku

Napsal: 04 říj 2010 14:56
od leew
Dobrý den,
hledal jsem na internetu řešení jak formátovat celý řádek a s radostí jsem našel toto řešení a využil ho.

Funguje skvěle ale mám tam jeden problém:

Když vložím text do buňky (zkopírovaný z emailu) s jiným formátem (než je v buňce) pak se mě po podmíněném formátováním, kdy se má celý řádek zabarvit dle podmínek, se buňky kde byl text vložen nezabarví. zabarví se pouze buňky kde byl text vepsán (vyplněn ručně).

Snad jsem to vysvětlil srozumitelně.

Děkuji
Marek

Re: Podmíněné Formátování celého řádku

Napsal: 04 říj 2010 16:07
od mike007
Ctrl+C text z mailu --> Excel: Klik pravým do buňky a vyber Vložit jinak --> Hodnoty