Příspěvky uživatele
< návrat zpět
@ohofman
tohle budete muset více specifikovat, protože z toho příkladu mi to teda jasné není
marjankaj napsal/a:
Najprv to číslo prepočítaj na dni a potom môžeš použiť formát času.
????
kobop napsal/a:
Metoda 2 nejspíš funguje pouze v případě, že ten mezivýsledek bude v buňce, pokud je mezivýsledek součástí vzorce, pak mi to nefunguje.
Pak to neděláte správně - funguje to - teď jsem vyzkoušel a výsledek byl zaokrouhlený
V podstatě není zač ;)
To je případ od případu
můžete místo ZAOKROUHLIT použít USEKNOUT, ale moc si nepomůžete
Aby k tomu potřebnému zaokrouhlení došlo automaticky?
Metoda 2 v odkazu
ano je to "vlastnost" excelu (a asi nejen) a musíte s tím počítat
vysvětlení zde
http://support.microsoft.com/kb/214118/cs
GeorgeK napsal/a:
Můžete to, prosím, trochu rozepsat "jak na to"?
Díky
;)))
Chtěl jste universální - a když je něco universální, tak to těžko rozepsat ;)))
https://www.google.cz/search?q=kontingen%C4%8Dn%C3%AD+tabulka+jak+na+to&oq=kontingen%C4%8Dn%C3%AD+tabulka%2C+jak+na+to&aqs=chrome.1.69i57j0l2j69i62l3.11083j0&sourceid=chrome&ie=UTF-8
Pokud to není kamarádka, taxe s ní hodně rychle seznamte, protože kdo ji nezná, nezná excel.
Jo a dodám - ona vypadá složitě - ale opravdu není
100000 kopií jednoho souboru?
mno když chcete, tak by to bylo nějak takto (sorry, ale 100000 souborů vytvářet nebudu, takže to zkuste otestovat u sebe ;)))) )
Sub subCopy()
Dim sExt As String
sExt = ThisWorkbook.FullName
sExt = Mid(sExt, InStrRev(sExt, "."))
Dim sDir As String
Dim I As Long
For I = 0 To 99999
sDir = ThisWorkbook.Path & Application.PathSeparator & Format(I \ 1000, "00") & "000"
If Dir(sDir) = vbNullString Then
MkDir sDir
End If
' FileCopy ThisWorkbook.FullName, sDir & Application.PathSeparator & Format(I, "00000") & sExt
ThisWorkbook.SaveCopyAs sDir & Application.PathSeparator & Format(I, "00000") & sExt
Next I
End Sub
FileCopy by bylo lepší, ale funguje jen v případě zavřeného kopírovaného souboru
Z té přílohy si nejsem jistý. Označil jste vždy pouze 1. buňku v NAZEVX.
Pokud hledáte pouze tu, tak
V buňce D17
=IFERROR(INDEX($D$6:$O$6;POZVYHLEDAT(D18;$D$8:$O$8;0));"nenalezeno")
Pokud libovolnou, tak
V buňce D17
=IFERROR(INDEX($D$6:$O$6;POZVYHLEDAT(D18;$D$8:$O$8;0)-MOD(POZVYHLEDAT(D18;$D$8:$O$8;0)-1;3));"nenalezeno")
(ta 3 v MOD znamená, že NAZEVX je vždy stejně široký 3 sloupce)
Proč dáváte přílohu na leteckou poštu, když jste
registrovaný a můžete ji vložit zde?
Platí pro E2007 a výše - quli IFERROR
@admin
Neuvažovali by jste o povinném poli - verze Excelu?
Jinak bych to viděl překvapivě na kontingenční tabulku(y)
Pokud chcete universální řešení, tak to už jsem napsal.
Možná tomu rozumím špatně, ale proč tak komplikovaně
které jsem vyexportoval do textového dokumentu a jsou oddělené středníkem
uložte jako csv nebo přejmenujte místo txt na csv a otevřete v excelu
edit:
soubor csv se primárně otevírá v excelu - takže pak stačí dvojklik na soubor
Asi by bylo vhodné vložit zde představu, jak má vypadat výstup - nemusí být ze všech 40k řádků
Jinak bych to viděl překvapivě na kontingenční tabulku(y)
standardně SUMIF, COUNTIF, kont. tabulka
pokud taková není, tak maticově definovat položky pomocí
KDYŽ($A$2:$A$21=D2;$B$2:$B$21)
s použitím dané fce - takže pro MEDIAN (maticově)
=MEDIAN(KDYŽ($A$2:$A$21=D2;$B$2:$B$21))
pokud by to u některé fce neházelo správné výsledky, pak zkuste ještě
KDYŽ($A$2:$A$21=D2;$B$2:$B$21;"")
Kontingenční tabulka
Palooo napsal/a:
mozno je to koli tomu ze mam nemecky office
;)
Palooo napsal/a:
... ale zas nadruhu stranu ... to je tak ked programatorom dovolia nedefinovavat premenne .)
Ano - Option Explicit by měl být natvrdo ;)
@Palooo
vychadzal som zo zadania kde bolo napisane ze stlpce su vyznacene slovami PRAVDA a NEPRAVDA ... takze musi to byt slovne
Takže to nemusí být slovně ;) - PRAVDA je prostě true a NEPRAVDA je false ;)
Ale není to nic hrozného - jen je to zbytečné ťukání do klávesnice
Uživatelské menu
\nMenu
On-line nástroje
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
RSS nejnovější články