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

Příspěvky uživatele

@Vovka
Vyzkoušel jsem. Vytvořit přímo pojmenovaný maticový vzorec, uložený jako obsah Name, se mi ale nepovedlo.

Nevím jak jste to zkoušel. Mně to funguje, vždy fungovalo (vzorec vložený do názvu se mi vždy počítá jako maticový bez stisku ctrl+shift+enter).
Ten příklad je z přílohy, kterou sem dal elninoslov (jen je to 2x aby to bylo delší než 255 znaků).

@Vovka
Jak ale ta buňka pozná, že jde o maticový vzorec?

Pojmenovaný vzorec je maticový.

Omezení se dá obejít. Např. takto: ActiveWorkbook.Names.Add "TestCSE", "=IF($a$3="""","""",RIGHT(REPT(""0"",LEN($a$3))&SUM(IFERROR(MID($a$3,LARGE(IF(ISERROR(--MID($a$3,LEN($a$3)+1-ROW($A$1:INDEX($A:$A,LEN($a$3))),1)),FALSE,LEN($a$3)+1-ROW($A$1:INDEX($A:$A,LEN($a$3)))),ROW($A$1:INDEX($A:$A,LEN($a$3)))),1),0)*POWER(10,ROW($A$1:INDEX($A:$A,LEN($a$3)))-1)),COUNT(--MID($a$3,LEN($a$3)+1-ROW($A$1:INDEX($A:$A,LEN($a$3))),1))))+IF($a$3="""","""",RIGHT(REPT(""0"",LEN($a$3))&SUM(IFERROR(MID($a$3,LARGE(IF(ISERROR(--MID($a$3,LEN($a$3)+1-ROW($A$1:INDEX($A:$A,LEN($a$3))),1)),FALSE,LEN($a$3)+1-ROW($A$1:INDEX($A:$A,LEN($a$3)))),ROW($A$1:INDEX($A:$A,LEN($a$3)))),1),0)*POWER(10,ROW($A$1:INDEX($A:$A,LEN($a$3)))-1)),COUNT(--MID($a$3,LEN($a$3)+1-ROW($A$1:INDEX($A:$A,LEN($a$3))),1))))"
ActiveCell.Formula = "=TestCSE"

@AL
Nebyla to reakce na Tebe. To bych specifikoval ;)

SVYHLEDAT tam není a není tam proto, že ji nepoužívám. Vůbec.
Pokud je podmínkou tohoto řešení (což nepředpokládám, bohužel je SVYHLEDAT funkcí, která se školí a tak je často jedinou, co se používá), tak to nechám někomu jinému...

Jde to. A protože jste nedal přílohu, já nedám návod (stejně bych asi nedal - protože se mi to nechce psát ;) )

Použity pojmenované vzorce.

@Hav-Ran - vítejte zpět ;)

@Vovka
Hmm - co na to říct. Omlouvám se za překlep v nicku (psáno z telefonu). Btw vy ten můj píšete špatně stále.

Ostatní nemá cenu - všechno úplně přesně popsal AL.
Jen se zeptám - všiml jste si, že jste tady jediný, kdo má pořád pocit, že někoho rozčiluje nebo že je na něj útočeno?

Neznám vaši verzi excelu - ale pokud můžete použít PowerQuery, tak tam se těm chybovým hláškám vyhnete.

Bohužel pro vás nemám radu, ale zkusil jsem to načíst do excelu (Power Query) a tam je to v pořádku.

Nicméně nastavení znakové sady nebo cokoliv podobného v GoogleSheets jsem nenašel...

@xlnc
Ještě jsi zapomněl na otazník ;)
Tento způsob "zaokrouhlování" mi ušetřil tolik problémů, že na něj nedám dopustit. Nicméně, když to začnu školit, tak všichni koukají - no už to taky vynechávám.

@vodka
Je to legrace. Přijde mi to,jakoby jste konečně začal objevovat Excel. Tipuji, že pokračujete ve čtení JW.
Na jednu stranu super vlákna, bohužel ale zapadnou.

@AL
Bohuzial, editor neumoznuje odsadzovanie

2 možnosti:
- uložit do textového souboru a vložit jako přílohu
- nahradit obyčejné mezery pevnými a teprve pak vložit

Kde tam píšete o
Application.DisplayAlerts = False
nebo
ActiveWorkbook.Saved = True

OK - všechno už jste zkusil a nás tedy zdržujete, protože jste nám to nepovažoval za vhodné sdělit.

Jděte do háje.

Toto téma (věčný kalendář) tady nebylo, takže proč ne. Může se to zdát přehnané, ale na základě tipů, které tady padly jste už schopní si vytvořit různé varianty věčných kalendářů - celoroční, docházkové listy apod.
Je to poměrně často využitelné řešení (kterékoliv)

Jen tip:
Pokud chce někdo studovat maticový vzorec - tak bych začal něčím typičtějším. Já to vždy ukazuji na vyhledání maxima (minima) v oblasti na základě podmínky v jiném sloupci (MAXIF, MINIF). Tam se to dá myslím krásně pochopit.

Dnes už mi to přijde zbytečné pomocí maticových vzorců.
Do 1. buňky dám vzorec=DATUM(ROK(B3);MĚSÍC(B3);1)-(DENTÝDNE(DATUM(ROK(B3);MĚSÍC(B3);1);2)-1)Do ostatních +1 k předchozímu dni.
Různý měsíc skryju podmíněným formátováním.

@David-Hruska
To mám, to jen odstraní dotaz zda uchovat data ve schránce

Nesmysl. Pokud jste to nastavil přesně jak psal AL, tak to musí fungovat.
Problém je, že se vám může zavřít soubor ještě před tím, než znovu přenastavíte Application.DisplayAlerts = True

Asi bych nejdříve zkusilActiveWorkbook.Saved = True
ActiveWorkbook.Close SaveChanges:=False

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje