Nevím, jstli to z toho popisu někdo pochopí. Snad jen elnino, ten má asi křišťálovou kouli.
Ideální je přiložit příklad, jaký je původní stav a jaký má být výsledek.
Trošku jsem to očesal.
Kdysi dávno jsem dělal takový formulář pro sklad.
Jestli se tím chcete prohrabat, tak přeji příjemnou zábavu....
Oba soubory musí být v jednom adresáři. Formulář je v souboru projekt. V souboru sklad jsou samotná data.
Aha.
Děkuji za vysvětlení.
Dobrý den,
rád bych znal názor na ppoužití formuláře.
V příloze je vzorová tabulka. V reálu je jmen (sloupců) na listě "vstup" 8 a ktivit (řádků) 10.
Data se zapisují jednou denně (večer) z papírového formuláře.
Aktuálně mám vždy jeden soubor na měsíc a jeden list na den.
Na konci měsíce makrem data převedu do podoby jak jsou na listu "Data".
Ideu mám takovou:
1. data budu zapisovat do listu "vstup" a po zapsání je tlačítkem přenesu do listu "data"
2. v listu vstup si mohu listovat jednotlivé dny zpětně
3. v listu vstup mohu editovat dříve zapsaná data
Dotaz zní, jestli je vhodnější použít formulář nebo stačí využít buňky listu + tlačítka a nebo je to jedno?
S čím se bude lépe pracovat?
Já osobně zatím o formuláři neuvažuji. Chci se vyhnout vytváření formuláře a jeho jednotlivých prvků ( 9x11 = 99 TextBoxů).
Nebo pro všechny:
Sub Makro1()
For i = 2 To 24 Step 2
Columns(i + 1).Hidden = True
Columns(i).ColumnWidth = 20.71
Next i
End Sub
Pokud chcete jenom toto a nebude na tento první krok navazovat x dalších, tak nejjednodušší je spustit "záznam makra", udělat požadované kroky a toto makro používat.
Nebo spustit záznam makra
skrýt sloupec C
rozšířit sloupec B
ukončit záznam makra
Potom spustit editor makra a tyto dva příkazy zkopírovat a jen přepsat jednotlivé názvy sloupců.
Není to sice moc elegantní, ale jste si to schopen udělat sám.
Pokud chcete něco víc a neumíte to, tak by bylo dobré napsat jak to chcete spouštět, jestli tam není potřeba zahrnout nějaké podmínky, jestli se vždy bude jednat o stejné sloupce apod.
Sub Makro1()
Columns("C:C").Hidden = True 'skryje sloupec C
Columns("B:B").ColumnWidth = 20.71 'rozšíří sloupec B
End Sub
Pokud by se mohla změnit struktura zdrojové tabulky, tak se dá použít Kontingenční tabulka.
elninoslov: Díky za inspiraci.
Díky.
To je tak, když člověk nečte pořádně návod
V původním článku to je popsané. Sice ne moc jasně (pro blbce), ale je.
Dobrý den,
mám Excel 2007
chtěl jsem vyzkoušet maticové vzorce, ale nejde mi to.
Přikládám soubor s mým pokusem. Sloupec A,B,C je originál (stažený z office.lasakovi.com).
Můj postup:
1. myší jsem označil buňky H2:H20
2. začal jsem psát vzorec (ten co je ve sloupci B)
3. ukončil Ctrl+shift+Enter
4. Vytvořil se sice maticový vzorec, ale nějak divně.
když si projíždím buňky v sloupci B, tak v části
COUNTIF($B$1:B1
se postupně mění B1, B2, B3 podle toho na jakém řádku jsem.
V mnou vytvořeném vzorci ve sloupci H však stále zůstává H1.
Ví někdo proč?
Děkuji
třeba:
=KDYŽ(NEBO(JE.PRÁZDNÉ(A1);JE.PRÁZDNÉ(A2);JE.PRÁZDNÉ(A3));"";12345)
nebo
=KDYŽ(COUNTBLANK(A1:A3);"";12345)
Pokud se vzorečky odkazují jen na buňky ve stejném listu, tak není problém zkopírovat vše do jiného sešitu do stejné oblasti.
Pokud se však vzorečky odkazují na jiný list, musí tento list (se stejným názvem) existovat i v novém sešitě.
Předpokládám, že ty Vaše vzorečky nebudou jen L32*D12.
Když vložíte soubor, bude se lépe hledat problém.
Cells(i, j).Formula = "=IF(" & f & ">" & g & "," & ((f - g) / f) * h & ",0)"
A pokud to"Hlásí chybu 'mismatch' na řádku, který je tučně".
tak pravděpodobně je v buňce Worksheets("List1").(Cells(b, d) textová hodnota místo číselné.
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.