V téme máš uvedené Import. V otázke zmieňuješ prepojenie. V upresnení hovoríš o vložení. Relatívnym odkazom (adresovaním) sa myslí v exceli niečo úplne iné, než, ja vlastne neviem, čo máš relatívnym odkazom na mysli ty, snáď linkovanie? Nene, takto sa nikam nepohneme. Budeš sem musieť dať prílohu s popisom, čo sa presne chce. T.j., štruktúra .txt bude rovnaká? Obsahuje len jeden riadok, jednu hodnotu, alebo čo vlastne? Toto všetko musíš uviesť ty, nemôžeš čakať, že to z teba bude niekto páčiť. Ja nesľubujem, že to budem riešiť, ale rozhodne zvýšiš svoje šance, že sa na to prípadne niekto pozrie, pokiaľ sa trochu rozpíšeš a dáš sem v ideálnom prípade i tú prílohu.
edit: pokiaľ ale teda ten súbor bude vždy v nejakej zložke na ploche a ty akurát nevieš, ako cez VBA zistiť cestu k ploche na konkrétnom PC, tak k tomu som nedávno odpovedal týpkovi, ktorý potom už ani nezabučal, tuná:http://wall.cz/index.php?m=topic&id=23530#post-23534
edit2: vlastne, píšeš, že .xls a .txt bude vždy v tom istom adresári, k zisteniu jeho umiestnenia potom môže poslúžiť jednoduché ThisWorkbook.Path v kóde umiestenom v danom .xls. Ale, písal som, do hlavy ti nevidím a súbory k dispozícii nemám, takže ma nútiš hádať, moc ma to nebaví. Snažiť sa musíš v prvom rade ty sám.
njn, ale na tú vetičku mám copyright, tak bacha
Ešte je dobrá táto: Každý dobrý skutok má byť po zásluhe potrestaný.
Tak toto asi bude potrebné najprv z tvojej strany trochu rozviesť, pokiaľ ti má niekto pomôcť.
Marku, obrázky skutočne nie sú pre riešenie týchto vecí tou najlepšou prílohou
Ale o.k. niečo som skúsil..
To na obrázku je zrejme slicer (průřez), že? Tak som si záznamníkom makra nahral zakliknutie položky u sliceru v mojom testovacom súbore. Záznamník zaznamenal:Sub Macro1()
'
' Macro1 Macro
'
'
With ActiveWorkbook.SlicerCaches("Slicer_LEVEL1")
.SlicerItems("CHALLENGE").Selected = True
.SlicerItems("IT").Selected = False
.SlicerItems("NW").Selected = False
.SlicerItems("Other").Selected = False
.SlicerItems("(blank)").Selected = False
End With
End Sub
Slicer_LEVEL1 je názov toho prierezu, čiže v tvojom prípade to bude zrejme Slicer_Datum.
No, a budeš musieť cez nejaký cyklus, napadá ma SELECT CASE u jednotlivých SlicerItems zadať FALSE, iba u aktuálneho dátumu TRUE. To celé dať do nejakej udalosti, zrejme Workbook_Open, chce to vyskúšať, ale nič zložité to asi nebude..
Pusti záznamník a nahrané makro si jednoducho uprav, to snáď zvládneš.
@ milý pán chytrý
o.k. pár minút ti ešte venujem, sľubujem, že už naposledy
ad:protože se nikdo neprosil o to, jak to udělat v SQL
Vážne? Mám dojem, že v úvode si písal akurát to, že by si nerád VBA...
MSquery je integrovanou súčasťou Excelu už po niekoľko posledných verzií, nenapísal si, že MSquery nie je cesta.
Uviedol si, neskôr, akurát, že je to pre teba španielska dedina. Ja dodám, že úplne rovnako si na tom i so vzorcami, inak by si nemohol napísať blud typu:Četl jsem ještě že jde použít kombinace funkcí pozvyhledat a index, jenže tam je prý podmínkou, že vyhledávaná jména budou srovnáma podle abecedy.
No, vlastne, už toto ma mohlo upozorniť, že je niečo špatne a navrhnutie MSquery je v tomto prípade hádzanie periel svini.
Je samozrejme možné vytvoriť obskurný vzorec, ktorý to celé zvládne tiež. Ale ten je schopný vytvoriť eLCHa, ja by som ho dal asi tiež, ale ty, panáčku, ani omylom.
Pokiaľ reagujem až po takej kapacite, akou je eLCHa, tak, ver alebo nie, iba v prípade, že ma zrovna napadlo podstatne jednoduchšie riešenie, čo je v tomto prípade zapojenie MSquery, pre ktoré je to záležitosť necelej minúty (vytvoriť dotaz tak, aby bol funkčný).
Kvalitu tohto fóra drží na akej-takej úrovni akurát pár jedincov, ktorí prichádzajú so zaujímavými problémami alebo dávajú riešenia, ktoré môžu niekoho ďalšieho inšpirovať. Kvôli nim mám ešte stále nejakú chuť to tu navštevovať. Väčšinou sa človek ale prehrabáva spústou balastu tvoreného príspevkami, obsahom ktorých je v podstate akurát: mám problém, zrozumiteľne popísať ho nedokážem, prílohu nedám, páč pracujem s citlivými údajmi, prosím hlavne žiadne makrá a ideálne čo najmenej klikov. Tak mi láskavo dodajte vzorec, ktorý budete vymýšľať hodinu a ja vám na záver poviem, nene, to neeefungujeee, blé, blé, blé. Takže vitaj , je, myslím, jasné, v ktorej skupine si, kvôli tej tu ja určite nie som..
CONVERT (DATE, GETDATE()) ti pmn prevádza aktuálny dátum, nie dátum a čas z DatExp, za SELECT CONVERT (DATE, GETDATE()) ti pmn chýba buď čiarka alebo AS, ďalej som v tom nepátral ale bude tam zrejme viac chýb..
Otázkou napr. je, či vôbec ako prvý argument (data type) môžeš použiť DATE, pmn by tam malo byť DATE()
http://www.w3schools.com/sql/func_convert.asp
Tak mi doporučte tu hodinovou literaturu :)) Nechceš toho trochu moc? Skús napr. Google..
Jinak a co můj poslední dotaz - jde to ještě nějak šikovně srovnat podle abecedy? V SQL inštrukcia ORDER BY . Ospravedlňujem sa za tú trochu škodoradosti.
Ale aby si nepovedal, že som zlý, tak napr. tuná sú nejaké základy SQL (niečo z toho sa dá stihnúť i za tú hodinu )http://www.w3schools.com/sql/
eLCHa, napísal som: sám ste okrem dvoch uvedených vytvoril i riešenie za pomoci vzorcov
Ja Vaše príspevky čítam pozorne
S nevyditeľnými riadkami naprostý súhlas, fakt brutálna telenovela
edit: aha, Vy to tam fakt píšete, že okrem VBA 2 možnosti, takže ospravedlňujem sa za nepozornosť a hlboká poklona
Dúfal som, že mi ukážeš nejaký mne neznámy trik, škoda. Každopádne, ďakujem za odpoveď.
jj ů na začiatku si napísal, sa Vám tí Vaši predkovia trochu mstia tým upálením majstra Husa, ktorý tak nemohol dotiahnuť reformu Vášho písma do konca
na MSquery nič nie je, stačí vyskúšať, jednoduché typy dotazov tvoríš v podstate celé v grafickom rozhraní, až u zložitejších potrebuješ už nejakú znalosť SQL
@eLCHa:Pokud nechcete VBA, máte 2 možnosti
Tých možností je určite viac, sám ste okrem dvoch uvedených vytvoril i riešenie za pomoci vzorcov. Samozrejme, dá sa použiť napr. mnou často zmieňovaná MSquery. Toto je síce jednoduchá úloha, ale na komplikovanejšie filtrovanie/triedenie je MSquery veľmi vhodná. V prípade riešenia tejto jednoduchej úlohy zápis SQL v MSquery takto:SELECT Jméno, ůtrata
FROM `Data$`
WHERE (`Data$`.skupina=0)
K rozšíreniu matice existuje jednoduchý trik - vzorec si skopíruješ inam, pôvodnú maticu zmažeš, vzorec z toho pomocného umiestnenia vrátiš na pôvodné miesto a maticu rozšíriš. Na vysvetľovanie je to zložitejšie, než to vyzerá v praxi, som trochu lenivý to popisovať presne krok za krokom.
Každopádne ale: Tá matica tam nie je dôležitá, môžeš použiť i nematicový vzorec, mne sa akurát nechcelo vzorec rozkopírovávať, tak som použil maticový. Ale snaž sa trochu sám, nemôžeš chcieť všetko na striebornom podnose.
@lubo
Pokud se text v buňce c2 má jen zobrazovat, ale nemusí nemusí v buňce vložen, tak lze použít podmíněný formát
Nedokážem prísť na to, ako to myslíš. Nedal by si sem jednoduchý vzor, prosím?
=B2:B8 & ZNAK(10) & " (" &HODNOTA.NA.TEXT(B2:B8/SUMA(B2:B8)*100; "0,00") & "%)"
=B2:B8 predpokladám, že aspoň táto časť ti jasná je
B2:B8/SUMA(B2:B8)*100 Táto časť vzorca počíta percentuálny podiel jednotlivých hodnôt na celku
HODNOTA.NA.TEXT(B2:B8/SUMA(B2:B8)*100; "0,00") sformátuje výsledok na dve desatinné miesta
& "%)" pridá znak percent
& ZNAK(10) zalomí riadok v bunke (v tomto prípade popisku)
@marjankaj
pochybujem, že práve toto bolo úplne lopatistické
@Jirka78
budeš sa musieť zmieriť s tým, že kp57 má v tomto prípade proste pravdu a vec vysvetliť potrebuješ ty, nie on (tým ovšem netvrdím, že tvoj vzorec nefunguje správne).
a aby toho nebolo málo, tak v riešení v inom vlákne teda pmn úplne správne určite nepostupuješ , mám na mysli toto vlákno: http://wall.cz/index.php?m=topic&id=23644. Nakoľko ale OP sa neozval, tak mu to zrejme vyhovuje tak, ako si to vytvoril. Trochu ťa v tomto prípade ospravedlňuje, že už samotné zadanie od masoxa bolo pomerne zmätené, ako je ostatne tuná dobrým zvykom .
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.