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

Příspěvky uživatele

Function FileExists(full_path As String)

full_path - obsahuje skutečně celou cestu s úplným názvem souboru?

For Each Cell In Rng

fileName = Cell & "*"
file = Dir(fileName)

If file = "" Then
Cell.Font.Color = vbRed
Else
Cell.Font.Color = vbGreen
End If
Next Cell

=KDYŽ(COUNTIF(F6:J6;"YES")=0;"C";KDYŽ(NEBO(F6="YES";H6="YES");"A";"B"))

"Na VŠ nám neustále kladli na srdce, že z hlediska přesnosti nemá smysl řešit více jak 4 číslice ve vypočteném výsledku."

Tady vypadlo slovíčko
"... více jak na 4 PLATNÉ číslice ..."

takže výsledek 0,0272 má jen 3 platné číslice,
ale 0,02720 může mít 3 nebo 4.

/google "počet platných číslic"/

"Výsledek bude mít stále 4 číslice. A desetinná čárka v něm buď nebude vůbec, anebo se bude pohybovat sem a tam."

Ale to odpovídá
1,234E+05 = 12340
1,222E-03 = 0,001222

Pokud vadí formátování
pak se stejným výsledkem jako píše lubo
=HODNOTA(HODNOTA.NA.TEXT(A1;"0,000E+00"))

formát buňky matematický nestačí?
0,000E+00
např.
1,234E+05
1,222E-03

Kontingenční tabulka na Tabulku není statická.

V příloze k KT.
Jen oblast přísl. řádku bude nutno nahradit dynamickým rozsahem.
/Na to jsou tady lepší hlavy/

maticově (editaci ukončit CTRL +SHIFT +ENTER)

=MEDIAN(KDYŽ(JE.CHYBA((KDYŽ(J:J=$A$1;1;"")*B:B));""; (KDYŽ(J:J=$A$1;1;"")*B:B )))

kde $A$1 je text, dle kterého se filtrují hodnoty.
(Snad to někdo udělá jednodušší.)

=percentil(oblast;1/3)
=percentil(oblast;2/3)

rozšířit vzorec také na hledání čísel

=COUNTIFS('01'!$K$3:$K$23;"*"&C2&"*";'01'!$B$3:$B$23;$A$1)+COUNTIFS('01'!$K$3:$K$23;C2;'01'!$B$3:$B$23;$A$1)

hledá jen v textu tj
2211001, 2211005 najde
2211001 nenajde

pokud někdo nejde jiný způsob vyhodnocení
tak sloupec KK naformátovat jako text (a čísla přeeditovat)

jedna možnost jak to obejít - kombinace - dvě barvy výplně pozadí a dvě barvy písma

Jestli jsem pochopil dobře
=INDEX(A:A;POČET2(A:A)-0;1)
=INDEX(A:A;POČET2(A:A)-1;1)
=INDEX(A:A;POČET2(A:A)-2;1)
=INDEX(A:A;POČET2(A:A)-3;1)
=INDEX(A:A;POČET2(A:A)-4;1)
.. atd

Typ = IIf(Val(Application.Version) <= 11, xlNormal, xlExcel8)

nemůže být xlExcel8 - ukládá jako xls
změňte na

xlOpenXMLWorkbookMacroEnabled - (resp. 52 ) ukládá jako xlsm

Ano lze.
Datum buď číslem 15.6.2019 - 43631
nebo funkcí DATUM(2019;6;15)

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje