Upravil jsem vzorec takto a našlo mi to.=POZVYHLEDAT(ZAOKR.DOLŮ(C1;ČAS(0;0;1));$A$1:$A$6983;0)=MATCH(FLOOR(C1;TIME(0;0;1));$A$1:$A$6983;0)
Ano (vaše hodnota je v A1, rok se bere aktuální)
1)=ČÁST(A1;NAJÍT("-";A1)+1;1000)=MID(A1;FIND("-";A1)+1;1000)
2) Výsledek si naformátujte jako datum (tady jsem zapomněl na pondělí až pátek, ale s tím už někdo snad pomůže)=RANDBETWEEN(DATUM(ROK(DNES());ČÁST(A1;NAJÍT(".";A1)+1;1000)/1;ZLEVA(A1;NAJÍT("-";A1)-1)/1);ČÁST(A1;NAJÍT("-";A1)+1;1000)/1)=RANDBETWEEN(DATE(YEAR(TODAY());MID(A1;FIND(".";A1)+1;1000)/1;LEFT(A1;FIND("-";A1)-1)/1);MID(A1;FIND("-";A1)+1;1000)/1)
https://proexcel.cz/castka-slovne/
Vyzkoušejte ISOWEEKNUM
Pro tento soubor si přepněte nastavení na kalendářní systém 1904, který umí zobrazovat a sčítat i záporné časy.
Pokud si někdo otevře soubor pouze pro čtení, nemůže blokovat jiné uživatele. Takže si myslím, že mi úplně nerozumíte.
Úplně nejjednodušší je použít oprávnění složky. Dejte soubor do složky, ve spolupráci s IT nastavte oprávnění a máte to bez hesla a spolehlivé.
Ano, existuje, ale heslo u toho musí být.
Dejte Uložit jako. Poté vyberte vedle tlačítka Uložit možnost Nástroje -> Obecné možnosti
Nastavte Heslo pro úpravy.
Při otevření souboru se excel zeptá na heslo, pokud ho neznáte nebo nechcete upravovat, máte možnost vybrat Jen pro čtení a tím neblokujete ostatní uživatele s právem zápisu.
Máte v kódu tvrdé odkazy Range("B3")
Dalo by se to vyřešit pojmenovanými buňkami, pak by kód "poznal", že se buňka posunula.
Ale píšete o 80 buňkách, takže vytvářet 80 názvů je nepraktické.
Pak je tu možnost skrytého sloupce, kde vložíte informaci, co se má s buňkou dělat. Toto bude reagovat na vložení řádku (celého). Takt nějak bych to asi udělal já.
Potom by vám stačil krátký kód, který provede operaci podleidentifikátoru.
Takže na vaši otázku, ano jde to.
Přesně k tomuhle slouží šablony.
Soubor otevřený nad šablonou se otevře s číslem na konci (podobně jako Sešit1, Sešit2 ...) a před uložením se vás zeptá. Šablonu tím nepřepíšete.
Power Query:
Ze souboru -> Ze Složky
Zaslal/a pk-wall 1.6.2020 14:59
Dobrý den,
opět se na Vás obracím s prosbou o změny.
Na listu "Zaměstnanci" prosím o přidání 1 řádku u "Manipulanti" u skupiny "B" za "Karásková Zuzana" tak, když se tam přidá člověk "Xxx" "Yyy" tak se propíše do "Měsíční plán směn" k Manipulantům do skupiny "B" za Karáskovou Zuzanu a do "Denního plánu" za Karáskovou Zuzanu..Druhým úkolem je na listu "Zaměstnanci" odstranit 5. prázdný řádek a rovněž propsat (odstranit) na dalších listech "Měsíční plán směn" a "Denní plán směn". Ty matice mi dělají velký problém. Mockrát děkuji.
Pokračujte v původním vlákně (jednom z nich)
Základem je práce z tabulkou. Pak se vše děje 'samo'. Tzn. zadáte vzorec jednou a on se sám bude vyplňovat do nových řádků.
Viz příloha.
Power query, např. něco takového
let
Casy = let
Zdroj = { Number.From(0)..Number.From(47) },
#"Převedené na tabulku" = Table.FromList(Zdroj, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
#"Přidané: Vlastní" = Table.AddColumn(#"Převedené na tabulku", "CAS", each Time.From([Column1] * Number.From(#time(0,30,0))), type time),
#"Přidané: Vlastní1" = Table.AddColumn(#"Přidané: Vlastní", "PAR", each 1, Int8.Type),
#"Odebrané sloupce" = Table.RemoveColumns(#"Přidané: Vlastní1",{"Column1"})
in
#"Odebrané sloupce",
Zdroj = List.Dates(#date(2020, 1, 1), Duration.Days(#date(2021, 1, 1) - #date(2020, 1, 1)), #duration(1, 0, 0, 0)),
#"Převedené na tabulku" = Table.FromList(Zdroj, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
#"Přejmenované sloupce" = Table.RenameColumns(#"Převedené na tabulku",{{"Column1", "DATUM"}}),
#"Změněný typ" = Table.TransformColumnTypes(#"Přejmenované sloupce",{{"DATUM", type date}}),
#"Přidané: Vlastní" = Table.AddColumn(#"Změněný typ", "PAR", each 1, Int8.Type),
#"Sloučené dotazy" = Table.NestedJoin(#"Přidané: Vlastní",{"PAR"},Casy,{"PAR"},"Casy",JoinKind.LeftOuter),
#"Rozbalené Casy" = Table.ExpandTableColumn(#"Sloučené dotazy", "Casy", {"CAS"}, {"CAS"}),
#"Odebrané sloupce" = Table.RemoveColumns(#"Rozbalené Casy",{"PAR"}),
#"Přidané: Vlastní1" = Table.AddColumn(#"Odebrané sloupce", "DATUM_CAS", each DateTime.From(Number.From([DATUM]) + Number.From([CAS])), type datetime)
in
#"Přidané: Vlastní1"
Jinak namapovaný síťový disk?
Zkusil bych vytvořit úplně stejný vzorec do vedlejší buňky a pak srovnal, jestli jsou ty vzorce úplně stejné - myslím cestu.
Viru se obávat nemusíte.
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.