Příspěvky uživatele
< návrat zpět
Vidim, ze nikdo neodpovida.
Uz jsem ti jednou psal velmi podobnou odpoved, ale z nejakeho duvodu se nechces vzdat tohoto zaskrkavaciho efektu.
Radim, abys uprednostnil spolehlivost pred efektnosti, checkbox patri na formular, ne na list s daty (alespon ten pozadavek replikace naznacuje, ze to takhle hodlas pouzit). Je to prece binarni ukazatel, ktery se da vzdy plnohodnotne nahradit sloupcem s nulou ci jednickou. Kopirovani checkboxu kodem je ponekud osemetna zalezitost a kopirovani rucne je spojene se zbytecnou rezii a i jistym nebezpecim nespravneho zlinkovani s pozadovanym radkem.
pises: "15:45>6:45 vyhodnotí jako nepravdu"
Pokud ti to to vyhodnocuje tahkhle, tak pravdepodobne to excel bere jako text, ne jako cas.
Bud je potreba 6:45 prevest na 06:45 anebo (a to bude urcite lepsi) na skutecne casove hodnoty tak jak je chape excel.
Jses tady asi nova, tak prekonavam odpor a odpovidam v podobnem duchu, jak se to na tomto foru odehralo jiz asi 1000 krat:
Zadani je nejasne a chybi priloha, ze ktere by bylo mozne udelat analyzu problemu. Casto je taky velmi dulezite vedet verzi excelu a jazykovou mutaci.
Zde se resilo neco hodne podobneho, urcite tam najdes inspiraci
http://wall.cz/index.php?m=topic&id=10058#post-10076
Prvni casti zadani nerozumim.
Druhou cast najdes treba zde:
http://wall.cz/index.php?m=topic&id=9716#post-9733
Tak s mirnymi upravami v priloze. Trochu jsem upravil vzorce, nebot se mi nezdalo, jak to pocitalo, ale klidne si to hod zpatky.
Tak toto bez maker nepujde. Ale ta architektura je jakasi podivna. Zadavaci bunky jsou roztrouseny bez ladu a skladu, vzorce taky, existujici makro havaruje kdyz se v bunce C3 zmeni hodnota, neni jasne, komu by se ta vypoctena odmena mela pripsat atd.
Navrh: zadavaci bunky (ty kde se zadavaji hodnoty) nasazej do sloupce A a pridej bunku pro zadani jmena. Vzorce treba taky do A nebo do B, ale nejak formatove to od sebe odlis, at si ty vzorce neprepises hodnotou.
Hodnoty pro listboxy (overeni bunek) bych odsunul az nekam za roh, treba sloupec >W.
Odmeny bych pripisoval na solo list, ale aby to melo databazovou strukturu, tedy nazvy sloupcu asi:
Jmeno, Castka, Priplatek, Akce, Datum, Mesic, Rok ...
pricemz zahlavi databaze bude ve druhem radku, bude na nem filtr a v prvnim radku budou v prislusnych sloupcich subtotalove vzorce napr. v C1 bude =SUBTOTAL(9; B:B). Vhodnym filtrem pak zjistis sumy za vyfiltrovane jmeno resp akci anebo casove obdobi.
Tak bych to delal ja, do takoveho souboru jsem pak ochoten vytvorit pozadovanou proceduru. Sorry, ze buzeruju, ale fakt ma vyznam delat architekturu poradne. Souboru, ktere nebyly na zacatku dobre promyslene a pak se olepovaly dalsimi funkcionalitami az vznikl hruzny paskvil, jsem uz par videl...
Pomoci UF pridat zakaznika do seznamu je malina. Taky ho lze pomerne jednoduse do UF nacist, pripadne jimi listovat. Ale jakmile to budes chtit spojit s dalsim "rozmerem", napr. kalendarem, zacnou potize. To uz do jedne tabulky nezadas a zjistis, ze musis resit relace mezi tabulkami. Taky bys chtel videt, jake ukony a kdy dany klient absolvoval a na kdy a jaky ukon je objednan do budoucna. A taky bys ho chtel nejak elegantne preobjednat, kdyz zavola a dalsi prakticke funkcionality.
Takze pokud se chces rozvest, udelej to v excelu a trvej na tom, ze to manzelka musi pouzivat 
Ne, vazne, to je ukol pro access, ale i zde to bude chtit pomerne slusne provozni zkusenosti s podformularemi a i tak bude potrebne si vyznamne vypomoci kodem, aby to bylo k necemu. Mrkni se radeji po nejakych aplikacich na netu, nedavno jsem tam narazil na temer free vymakanou accessovou aplikaci pro farare: mse, pohrby, seznam farniku, brigady, kazani, soupis majetku, naklady farnosti... 
To se tezko simuluje. Nevim jestli to pomuze, ale zkus treba nacist aktivni okno a pak ho kodem aktivizovat, pote co ho zakryje prohlizec. Nejak takhle:
Sub ....
Dim okno As Window
Set okno = ActiveWindow
....
....
tady to prekryje prohlizec
a takhle, snad, by se to mohlo opet vratit:
okno.Activate
anebo si pohrat s vlastnosti formulare modalview ci jak se to presne jmenuje, jestli si matne vzpominam. I kdyz mam dojem, ze to fungovalo jenom v urcitych verzich excelu 
Tak si to po tom importu do te jedine bunky nasazej vzorcem nebo makrem. Vzorcem treba takhle:
=A1&A2&A3&A4&A5&...
Pokud bys to chtel zalamovat za kazdym radkem, tak to se mi vzorcem nedari. Zalamovaci znak se da neprimo vytvorit jako CHAR(10) [v ceskem excelu asi ZNAK(10)] ale vzorecek mi to jaksi nebere. Ale mozna to je kvuli memu specialnimu regionalnimu nastaveni Windows.
Ale pomoci VBA to urcite jde takhle:
activecell = "text1" & vbCrLf & "text2"
Tak toto udelat v excelu, aby to bylo pouzitelne, je velmi velmi rozsahly ukol. Obavam se, ze vubec netusis jak moc.
Dle mych zkusenosti to takhle nejde i kdyz pripoustim, ze se muzu mylit.
Ale urcite by to slo takhle:
If Application.WorksheetFunction.CountIf(Range("A1:A?"),"pes")>0 then
Moc jasne ses nevyjadril, kterych tech 1000 te zajima. Jestli tech s nejvyssim prodejem, tak to si do KT pridej tento parametr, nejlepe jako strankove pole a filtr nasad na nej.
Nekdy je s KT tezka domluva, pokud to clovek nezna jak hodinky, tak ten kyzeny vysledek nedostane. V takovem pripade je pak lepsi se na KT vybodnout a tahat si vysledky primo z dat ruznymi zpusoby (databazove vzorce, rozsireny filtr, maticove vzorce, SUMIFS, MSQuery, ADO SQL atd...)
No nepredbihej udalostem s tou gratulaci 
, nejspis tam jeste nejaka drobnost bude zlobit.
Ale v globalu to facha
Takze jsem tam vrazil sumarni list, ktery tam, doufam nebude vadit, kdyz bude trvalou soucasti sesitu.
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