• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: Podmíněné formátování buněk se vzorcem

Zaslal/a ppetra 11.3.2014 8:31

Dobrý den,
chtěla jsem se zeptat jestli jde nastavit podmíněné formátování tak, aby se buňky ve kterých je vzorec podbarvovaly a buňky pouze s čísly ne.

Zaslat odpověď >

---

Strana:  1 2   další »

Palooo(11.3.2014 8:39)#018205

dajte do podmieneneho formatovanie =NOT(ISNUMBER(C6))citovat

ppetra(11.3.2014 9:31)#018208

a nerozliší to pouze jestli je v buňce text nebo číslo? Díkycitovat

AL(11.3.2014 9:33)#018209

@Palooo: to fungovať nebude
@ppetra: S trochou VBA by to asi šlo.
UDF:Function IsFormula(arg As Range) As Boolean
IsFormula = arg.HasFormula
End FunctionAko validačné pravidlo potom:=IsFormula(A1)=TRUEa nastaviť oblasť, na ktorú sa má vzťahovať, napr:=$A$1:$C$3citovat

Palooo(11.3.2014 9:53)#018210

Al: u mna to funguje

edit: uz chapu to nema rozlisovat text a cislo ale formulu :)) tak potom sa ospravedlnujem

Příloha: 18210_test.zip (7kB, staženo 16x)

citovat

Opičák(11.3.2014 9:58)#018211

Toto je sice na jiném principu, ale v některých situacích může usnadnit hledání na listu. Označí všechny použité buňky komentářem s informacemi o konkrétní buňce. Je tam ještě druhé makro pro info o Listu.

Příloha: 18211_vzorec-a-popis-bunky-do-komentare.zip (22kB, staženo 16x)

citovat

ppetra(11.3.2014 10:21)#018212

Já bych spíš potřebovala něco co mi na první pohled ukáže, kde je v buňce vzorec a kde ne.

S tím co píše AL si bohužel nedokážu moc poradit citovat

Palooo(11.3.2014 10:36)#018213

budete musiet vytvorit v dokumente makro kde napisete to co vam Al navrhol:
Function IsFormula(arg As Range) As Boolean
IsFormula = arg.HasFormula
End Function

a potom do podmieneneho formatovania len napisete:
=IsFormula(C6)

prikladam prilohu kde je to hned jasne
... do spravca makier sa dostanete s stlacenim F11
... subor musite sajvnut ako XLSM (aby podporoval makra)

Příloha: 18213_test.zip (13kB, staženo 18x)

citovat

AL(11.3.2014 10:48)#018216

Já bych spíš potřebovala něco co mi na první pohled ukáže, kde je v buňce vzorec a kde ne.
Na to mimochodom bohate stačí F5->Special->Formulacitovat

Opičák(11.3.2014 10:57)#018217

a toto ?
edit:
to co píše AL je jednodušší a elegantnější

Sub najdiVzorce()
x = ActiveCell.Row: y = ActiveCell.Column
Cells.Select
Selection.Interior.Pattern = xlNone
Selection.SpecialCells(xlCellTypeFormulas, 23).Select
With Selection.Interior
.Color = 65535
End With
Cells(x, y).Select
End Sub

Příloha: 18217_kde-je-vzorec.zip (16kB, staženo 15x)

citovat

eLCHa(11.3.2014 14:17)#018227

Už jsem tu dlouho nic nenapsal, tak abyste na mně nezapomněli ;)

@Opičák
Select :(

2 řádky a to jen proto, že se může stát, že tam žádný vzorec není:Sub subFormulas()
On Error Resume Next
ActiveSheet.UsedRange.SpecialCells(xlCellTypeFormulas).Interior.Color = vbYellow
End Subcitovat

Strana:  1 2   další »

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse