Příspěvky uživatele


< návrat zpět

Strana:  1 2 3 4 5 6 7 8 9   další » ... 10

No vida, umělec (El Ňiňo) se pozná, takže ten to umí i s tím klasickým. V přiloženém souboru jsem zkoušel napsat proceduru na listování comboboxem ActiveX a po inspiraci taky tím klasickým.
Jde to s oběma, ale fakt tam jsou rozdíly, viz komentáře

google drive nebrat. Ten prvek, co máš v sešitu je svými osekanými možnostmi zcela nevhodný pro účel co popisuješ. Možná by to nějaký umělec dokázal, ale spíš ne. Pokud bys místo toho použil velmi podobný prvek ze škály ActiveX, (ribbbon Vývojář - Vložit), tak tam je plná škála možností jak to ovládat kódem.

Bylo mi předem jasné, že další požadavky na listbox budou přibývat. Pokud bys chtěl do listboxu posílat jenom některé sloupce, tak i to jde, ale lze tam poslat celou tabulku, akorát některé sloupce dostanou nulovou šířku, takže v listboxu nebudou vidět. Třeba takhle (jak jsi chtěl, pouze sloupce A;N;O):
With .ListBox1
.ColumnCount = iSloupcu 'urči počet sloupců
.ColumnWidths = "100pt;0pt;0pt;0pt;0pt;0pt;0pt;0pt;0pt;0pt;0pt;0pt;0pt;100pt;100pt;0pt;0pt;"
.RowSource = rgOblast.Address
End With

Ale počet sloupců máme proměnlivý, kdežto šířky sloupců jsou dány natvrdo - což není zrovna košér. To jen pro ilustraci, správně by se ten řetězec pro šířky musel vytvořit ve smyčce... Ale máš zde odpověď na svojí otázku ohledně šířky sloupců v listboxu.
Spíš jsem očekával, že z povahy listboxu v něm budeš potřebovat zvolit některý řádek (nebo více řádků: podle nastavení vlastnosti MultiSelect) a po kliknutí na nějaký button s tím výběrem pak něco udělat.

Mělo by to jít. Pokud si aktivuješ např. tuto free službu https://www.t-mobile.cz/e-mail-do-sms,
tak ta umožňuje posílat SMS na základě e-mailu. A excel umí vytvořit a odeslat e-mail (minimálně v Outlooku), zde na fóru najdeš mnoho řešení.
Ale nevím, jestli to není omezeno pouze na SMS pro T-Mobile SIM karty.
Tak to prozkoumej a poděl se s námi o výsledek

V příloze je doplněný kód pro to cos popsal

V příloze jednoduchý soubor, který:
1. otevře texťák test.txt v adresáři kde bydlí tento excelový soubor
2. vezme prvních 7 buněk prvního řádku, hodnoty oddělené středníky načte do jednoho řetězce a ten pošle to do texťáku jako nový řádek
3. toto zopakuje pro 80 řádků


Data zadává na každé směně 11 lidí, každý zadá to svoje. Mám na starosti celkem 4 směny tedy 44 lidí. Proto bych Rád aby se zadaly údaje z každého formuláře do jednoho listu. Který má hromady vzorců a proto si nemůžu dovolit jim to nechat odblokované. Ale tak asi jiná možnost není, protože je nepřijatelné, abych jim dával heslo, aby list odemkli. Ale nevadí nechám to plavat. Jen si matně pamatuji, ze školy, že existoval zápis ve VBA, který mi při otevření formuláře odemkl list vložil data a poté zase po stisknutí tlačítka pro uložení se list opět zamkl. Chtěl jsem si jen urychlit práci.

Teď to funguje tak, že oni mi to zadávají do obyčejného excelu napsané a já to přepisuji do finální tabulky za ně pomocí formuláře Chtěl jsem jen aby to psali oni rovnou do té hlavní tabulky, protože je toto celkem dost položek a údajů, tak jsem chtěl aby to dělali sami, ale s odemčeným listem si to na triko nevezmu. Ale i tak moc děkuji.


Tak takovouhle situaci řeším tak, že uživatelé mají svůj excel, který obsahuje zadávací formulář a jenom obslužnou logiku, která data zvaliduje a odešle do databáze access někde na ethernetové síti. Uživatelé vůbec netuší kam. No a pak si data natáhnu z DB do svého excelu ... Výhodou je, že žádný uživatel nemusí čekat až bude excel "volný". Nevýhodou je, že tu DB na serveru může někdo najít a pozměnit či smazat.

Dík!
Sice v řešení marjankaj (bez PF) úplně nechytám ten trik, ale fachčí to dobře

Přece jenom bych se ještě zeptal: funguje to skvěle, pokud je časový údaj >= nule. Pokud bych ale třeba chtěl zapsat chybějící (tedy záporné) hodiny, tak to háže eror.

Dalo by se i toto nějak, formátově či jinak, ošetřit?

Děkuji

Ahoj, pošli oba soubory s několika daty.
Nejdřív to bude chtít vyladit aby to dělalo co to má.
Máš tam např. proměnnou materialExists, ale vůbec s ní nepracuješ. Zřejmě to mělo sloužit na opuštění cyklu pomocí Exit For, ale to tam taky nevidím. Takže počet smyček bude vždy maximální (lastRowJG * lastRowVer1), což je často zbytečné...
V druhém kroku by se hodilo nahradit "Range operace" na operace v rámci array, které jsou násobně rychlejší. Tipuji, že po optimalizaci se dá dostat ze 3 hodin na desetinu...

Ahoj,
možná triviální věcička, ale nedaří se mi. Potřebuji zobrazit časovou hodnotu ve formátu hodiny:minuty, což funguje dobře jen do hodnoty < 24 hodin, dál už to zobrazuje jen hodiny a minuty dalšího dne. Já ale potřebuji zobrazit čas pro vyčíslení hodin a minut trvání nějaké události. Např. abych mohl zadat údaj 34,75 a v buňce by se zobrazilo 34:45

Ty podmínky jak jsi je sepsal jsou divné, ale je to jak jsem tomu porozuměl. Šak si to ve VBA upravíš podle potřeby.

Myslím, že nič také neexistuje

Do stĺpca K vzorec =C3+D3-F3-G3-H3
Síce to u EF nesedí, ale to bude asi preklep


Strana:  1 2 3 4 5 6 7 8 9   další » ... 10

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

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.

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09