Příspěvky uživatele


< návrat zpět

Ještě bych dodal, že jsem něco podobného řešil když jsem neměl čak tak, že jsem v cyklu procházel řádky a skryl jsem je, až jsem měl na listu to co jsme chtěl, tak jsme vytisknul.

Ale raději bych to udělal způsobem, na který se dotazuji.

Zdravím,

potřeboval bych pomoci s tiskem nepojitých oblasti.

Vše co jsem zkoušel má za následek to, že se oblasti vytisknou, ale každá na jinou stránku.Co oblast to stránka. Jedná se o tabulku v celku, kde si vybírám co z ní tisknout a chtěl bych, aby ve výsledku to tvořilo nerozdělený výstup, jeden list.

zkoušel jsem

Set Oblast=Range("A3:E8,A50:E60,....")
PageSetup.PrintArea= Oblast.address

Tohle vytiskne všechny oblasti každou na jednu stránku, nejspíš je problém v tom, že se to na stránky umístí v pozici takové jako by se tisklo všechno.

Díky za nápady

Excel jsem volil, protože uživatelé v tom už něco spracovávali ,ale bylo to hrozné, museli spoutu věci počítat na kalkulačce a co hůř přepisovat pak do formulářu rukou.

TeĎ už mám funkční aplikaci která dle mě je celkem dobře pro ten účel pouitelná. Každopadně teĎ vidím co jsem udělal a budu to předělávat do bakalářky.
Pojedu na JAVE z několika důvodu, umím poměrně PHP ale to je už dost chlupaté, takže tak. Přístup bude řešen přez https a uživatelé tak budou moci k tomu centralizovaně přistupovat. MYSQL už je tady samozřejmost.

Je to sakra složitější:) kvuli přehlednosti se tady musí rozlišovat Lesní správa, revír lesní správy a porost. Lesních správ je více, revíru je násobně více a porostu může být desetinásobně více.

potom zde existuje 5 druhů výpočtu+ ta pravá část je omezena počtem dřevin, takže ty dřeviny se tam dynamicky přiřazují. dole se pak sčítají podle toho jestli je v soupci A křížek. No a ještě více dole je další formulář kde se zapisují zase trochu jinačí data.

Prázdný list má velikost 320kb:) nějakej řádek kódu už tam je.)

Musím teď ze souboru co uživatel uloží udělat sumář(uzávěrka) všech souboru v určité složce. Takže to znamená otevřít všechny soubory a načíst dřeviny co se tam vyskytují. (SM=smrk).

Tím že hledám řádky kde je smrk tak zjístím ještě jiné hodnoty, ty převedu metodou recordset.GetRows na pole a z toho už snad nebude těžké dále data zpracovávat. Tohle nemám moc promyšlené. Více méně jdu na slepo, ale vypadá to že tudy cesta vede.

Takže to vypadá že problém vyřešen,

pro ujasnění první řádek nemusí obsahovat název, který by určoval sloupec! V mém případě neobsahuje!

F1,F2...Fx jsou indexace nepojmenovaných i pojmenovaných sloupcu od leva F1=první sloupec!

Takže Select F1 From vrací hodnoty z prvního sloupce!

Správný select je tenhle:
Dotaz = "SELECT F1 FROM [" & List & "[b]$A8:C57[/b]] where F3='SM'"

Chyba byla že jsem omezil hledanou oblast na A9:R57. Při oblasti A8:R57 je select funkční a proběhne!

přikládám kousek screenu jak list vypadá.

Díky vyzkouším a uvidím s těma F1...Fx to funguje nevidím důvod proč bych si měl vymýšlet a ty mě nevěřit:).

SQL vysvětlovat nemusíš něco ze školy znám.) Snad tomu příjdu na chuť a pak se tady podělím.

zatím díky

Já právě nevím začal jsem do excelu více pronikat teprve nedávno. Ty F1,F2,F2 nejsou bunky, ale tak se číslují sloupce F1 je první sloupec F2 je durý Fx je sloupec v tramtárii v tom je ten problém pokud použiji:

Dotaz = "SELECT * FROM [" & List & "$A9:R57]"
vše je korektní

ale jak začnu do toho dávat ty Sloupce F1 tak už je chyba na světě. Googlil jsem a nic moc jsem nenašel, ale myslím, že by to jít mělo!

Já čtu data ze sešitu přez sql dotazy, to se dá a dělá se to. Mám jako by pracovní sešit co ukládá datové sešity a ty se teĎ snažím číst!

No a potřebuji napsat to co jsem popisoval nahoře. Omezit hledání na oblast v sešitu.

tohle dotaz nefunguje a za boha nevím jak to udělat aby šel:
Dotaz = "SELECT f1 FROM [" & List & "$A9:R57] where F3='SM'"

Debug.Print Dotaz

rs.Open Dotaz, cn, adOpenKeyset, adLockOptimistic
MsgBox rs.RecordCount

díky za reakci ADO(access database object).

používám VBA v excelu to je zřejmé myslím.

Jde oto, že jsem psal, že nechci aby to hledalo v celém sešitu!!Co jsi napsal funguje jak jsme psal víše s F(index). Hledá to v celém sešitu!!To nechci

chtěl bych pořešit tohle

Dotaz = "SELECT * FROM [" & List & "$A7:R57] where [" & List & "$C7:C57]='SM'"

Select kde za FROM bude určená oblast, List1$A7:R57 určí oblast hledání. Ale jak použiji WHERE tak už je nefunkční nevím jak mám zapsat správny select.

Prosím o pomoc, dlouho už hledám naležitý selekt kterým bych použil k vrácení záznamu ze sešitu.

Sloupce nemám pojmenované, zkoušel jsem knim přistupovat přez F(index). To není problém.

Dotaz = "SELECT F1,F4,F3 FROM [" & List & "$] where F3='SM'"

Ale problém nastává, když nechci abych dostal vysledek z celého sešitu ale jenom z nějaké oblasti, nevím jak to zapsat. zkoušel jsem něco takového, ale je to chybné!

Dotaz = "SELECT * FROM [" & List & "$A7:R57] where [" & List & "$C7:C57]='SM'"

prosím o pomoc, jedná se mě oto, abych v klauzule WHERE mohl definovat omezení, aby to vracelo řádky pouze kde je hodnota ='SM'

děkuji za nápady


Uživatelské menu

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

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

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.

On-line nástroje