Pokud to budeš dělat ve VBA, tak část toho řetězce nahraď proměnnou...
Jinak by to asi chtělo přílohu a upřesnit podle čeho se to bude měnit.
P.citovat
Jinak by to asi chtělo přílohu a upřesnit podle čeho se to bude měnit.
P.citovat
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Tipy a triky pro Excel a makra VBA
< návrat zpět
Téma: Podmíněné formátování
MS Excel
Téma: Podmíněné formátování 
Zaslal/a ladaakk 30.5.2013 18:34
Ahojky. Mám takovej dotaz.
Jze v podmíněném formátování dynamicky měnit rozsah?
(Platí pro=$C$43:$C$500)zkoušel jsem tam dát def. název, ale to mě nešlo. V VBA jsem našel jen změnu barvy.
Mám Office 2007
Pomocí VBA lze napsat podmíněný formát a měnit rozsah lze taky.citovat
Co znamená
Lze v podmíněném formátování dynamicky měnit rozsah?
Máte tabulku, která se rozšiřuje - pak stačí pouze kopírovat formáty
nebo hotovou tabulku - pak není třeba nic měnit a jen stačí správně nastavit podmíněné formátování
Bez přílohy vám to ale nikdo neřekne.citovat
Lze v podmíněném formátování dynamicky měnit rozsah?
Máte tabulku, která se rozšiřuje - pak stačí pouze kopírovat formáty
nebo hotovou tabulku - pak není třeba nic měnit a jen stačí správně nastavit podmíněné formátování
Bez přílohy vám to ale nikdo neřekne.citovat
Jasné napsal jsem to moc obecne. Tady je soubor.
Po vyplnění datumu na D6 se změní rozsah tabulky ve sloupečku B. V Podmíněném formátování bych chtěl aby místo =$B$20:$B$48 bylo =SloupecB1(definovaný název). Stačí jen naznačit.
Po vyplnění datumu na D6 se změní rozsah tabulky ve sloupečku B. V Podmíněném formátování bych chtěl aby místo =$B$20:$B$48 bylo =SloupecB1(definovaný název). Stačí jen naznačit.
Příloha: 
13587_pformat.zip (8kB, staženo 33x)
citovat13587_pformat.zip (8kB, staženo 33x)Možná takto:
Sub PF_3barskala()
'
'smaze vsechny podminene formatovani na liste
Worksheets(1).UsedRange.FormatConditions.Delete
'vytvori podminene formatovani pro oblast ()
OblastPF = Worksheets(1).Range("A1")
With Worksheets(1).Range(OblastPF)
'podminene formatovani 3barevna skala
.FormatConditions.AddColorScale colorscaletype:=3
End With
End Sub
-Do A1 se napíše název oblasti
-na listě mít 1 podminene formatovani (vsechny se mazou)citovat
Sub PF_3barskala()
'
'smaze vsechny podminene formatovani na liste
Worksheets(1).UsedRange.FormatConditions.Delete
'vytvori podminene formatovani pro oblast ()
OblastPF = Worksheets(1).Range("A1")
With Worksheets(1).Range(OblastPF)
'podminene formatovani 3barevna skala
.FormatConditions.AddColorScale colorscaletype:=3
End With
End Sub
-Do A1 se napíše název oblasti
-na listě mít 1 podminene formatovani (vsechny se mazou)citovat
Blbé je, že v tom listě je mám asi 15 sloupců a na každém jsou 2 podmínky na formátování. No vyzkouším to a něco se stane. 
citovat
citovatTak to chtělo vědět , že tam bude více PF.
No zkusím ještě něco když je tam více PF.
Teď mě napadlo, že kdyby toto pf bylo vždy poslední tak by šlo jich tam mít více,
počkám s čím přijdeš
citovat
No zkusím ještě něco když je tam více PF.
Teď mě napadlo, že kdyby toto pf bylo vždy poslední tak by šlo jich tam mít více,
počkám s čím přijdeš
citovatPripojim se s otazkou ohledne podm.formatovni. Mam taky tabulku ve ktery mam nekolik podm.form. Tabulka ma cca 1500 radku a 20 sloupcu. pri zapisovani je ted hodne pomala, musim cekat nez kurzor preskoci na sousedni bunku po odentrovani, nez naskoci podm.fomatovani, atd. je to normalni, nebo se da to nejak zrychlit?citovat
Tak jsem si s tím hrál a nic moc jsem nevymyslel. Tady je tabulka, jak vypadá. Rozsah formátování je „ADnom11“ je to vlastně datum prvního zápisu v listu přehled. Do PF chci dostat jen definovaný název „ADnom11“ a ne jen =$B$14:$B$48.
Příloha: 14272_pformat2.zip (10kB, staženo 32x)
citovat14272_pformat2.zip (10kB, staženo 32x)No tak na to koukni.
zas jsem chytřejší ohledně PF ve VBA
zas jsem chytřejší ohledně PF ve VBA
Příloha: 14277_pformat2upr2.zip (26kB, staženo 36x)
citovat14277_pformat2upr2.zip (26kB, staženo 36x)Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Helios iNuvio
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.
RSS nejnovější články