Příspěvky uživatele

Kdybych mohl odemknout soubor tak tady nežádám o radu.- To si předtím nenapísal a zrejme máš dojem, že som sa to mal dovtípiť. Odpovedal som na to, prečo máš voľbu presvietenú. Radiť ti teda nebudem, nestojím o to, aby mi niekto odpovedal štýlom, ktorý si použil.

Odomkni listy/súbor, potom by to prepojenie malo ísť odstrániť.

Veď som písal, že pomocným stĺpcom sa vyhneš ťažko, mal som za to, že je jasné, že indirect používam pre vytvorenie pomocných
stĺpcov a až z nich sa bude počítať minimum.

Tak si s tým PQ trochu hrám a zatiaľ sa mi to zdá trochu ťažkopádne proti tomu, čo ponúka Access. Ale to ovládanie je pomerne intuitívne a nejakú službu táto nová funkcionalita asi plniť môže. Hlavne pre užívateľov, ktorí sa nechcú trápiť s SQL alebo žiadny DBMS proste k dispozícii nemajú. Keď sa budem nudiť, pozriem sa na to trochu hlbšie.

Odstrániť z tabuľky začínajúcej na riadku 10 duplicitné záznamy pre krajinu aa a dodávateľov aaa a bbb. V sheete som vyznačil záznamy, ktoré majú byť odstránené. - Sú to tie žlté, tie majú zostať na liste viditeľné, aby ich bolo možné odstrániť :).
Vlastne, máš pravdu, po odstránení majú zostať tie, ktoré uvádzaš vo svojom riešení.

pepe, vyzerá to zaujímavo, PQ som doteraz nikdy nepoužil, takže je to pre mňa nová oblasť. V minulosti som sa chvíľu hral s Power Pivotom, ale príliš som tomu na chuť neprišiel. Mal som v práci Access a tam som sa cítil bezpečnejšie.
Ale sľubujem, že sa na Tvoje riešenie pozriem detailnejšie. Každopádne, PQ v práci na 2007 nemám, nemám zatiaľ ani Access, človek ťažko uverí, že niekto rieši 6 tisícovú položku :(. Tvoje riešenie síce nespĺńa zadanie, ale je v každom prípade zaujímavé. Výsledkom query mali byť tie žlté hodnoty, nie tie druhé, to je ale detail, to sa v tom PQ určite dá nastaviť, aby sa zobrazila tá druhá množina.

No, nejakým elegantným vzorcom bez pomocných výpočtov to pôjde asi ztuha. Pokiaľ by si si do buniek F1 až H1 napísal miesto 1. kolo kolo1, atd. dá sa vytvoriť síce pomocný, ale rozkopírovateľný vzorec. V bunke F2: =IFERROR(INDEX(INDIRECT(F$1&"!T3:T20");MATCH(STATS!$B2;INDIRECT(F$1&"!S3:S20");0)); "-")
rozkopírovať dolu a doprava.
Inou možnosťou je zotriediť dáta na jednotlivých listoch abecedne, aby tie teamy mali rovnaké abecedné poradie. V tom prípade to potom pôjde jedným vzorcom v tvare =MIN(kolo1:kolo3!B3)

To pôvodné nezredukované pole zapíš do pomocného sheetu a použi funkcie sum, min a max. Zredukuj a vráť späť do poľa.

Ja načítam dáta do poľa z oblasti začínajúcej v A1, za pomoci nasledovného kódu potom pole zredukujem:Sub ArrayReduced()
Dim myRng As Range, tmpSh As Workbook, i As Integer, j As Integer, myArr
Set myRng = [A1].CurrentRegion
Set tmpSh = Workbooks.Add(xlWBATWorksheet)
With tmpSh.Sheets(1)
myRng.Copy .[A1]
Set myRng = .[A1].CurrentRegion
With myRng
For i = .Rows.Count To 1 Step -1
If WorksheetFunction.Sum(.Rows(i)) = 0 And WorksheetFunction.Min(.Rows(i)) = 0 And WorksheetFunction.Max(.Rows(i)) = 0 Then .Rows(i).Delete
Next i
For i = .Columns.Count To 1 Step -1
If WorksheetFunction.Sum(.Columns(i)) = 0 And WorksheetFunction.Min(.Columns(i)) = 0 And WorksheetFunction.Max(.Columns(i)) = 0 Then .Columns(i).Delete
Next i
End With
End With
myArr = myRng
tmpSh.Close False
For i = LBound(myArr, 1) To UBound(myArr, 1)
For j = LBound(myArr, 2) To UBound(myArr, 2)
Debug.Print myArr(i, j)
Next j
Next i
End Sub Následne si ešte musíš poriešiť tú inverznú maticu, kód rieši akurát redukciu, ale s tým snáď poradíš, keď nie si schopný dať sem prílohu, na čo sa sanžil upozorniť ťa marjankaj.

Ahoj,
riešil som nasledujúci problém (mám už vyriešené, ale zaujímalo by ma, aký postup by použil niekto ďalší).
Zadanie: Odstrániť z tabuľky začínajúcej na riadku 10 duplicitné záznamy pre krajinu aa a dodávateľov aaa a bbb. V sheete som vyznačil záznamy, ktoré majú byť odstránené. Tzn. konkrétny dodávateľ nemusí byť iba u krajiny aa a naopak, nie na všetkých dodávateľov u krajiny aa je možné aplikovať odstránenie duplicitných záznamov. V reále má tabuľka viac než 100 tis. položiek a spústu stĺpcov a pár dodávateľov, u ktorých majú zostať iba neduplicitné položky. Z uvedeného dôvodu sa nie ako vhodné javilo použite nejakého pomocného stĺpca, cez ktorý by sa dalo potom filtrovať. Resp. vzorec, ktorý som použil ja, sa pre tak veľký rozsah dát, napriek tomu, že počítal správne, javil nad možnosti Excelu 2007 na stroji, ktorý mám v novej práci k dispozícii. Hľadal som preto riešenie cez rozšírený filter. Zrejme sa podarilo, ale otestujem až v práci, či sa s tým moja stará plečka v práci popasuje. Otázka teda znie: príde niekto na to, ako uvedený problém riešiť rozšíreným filtrom, prípadne vzorcom, ktorý uvedené spočíta rýchlo a excel u toho nebude zamŕzať? Bez toho, aby boli dáta sortované a pod. Hľadám non VBA riešenie. Uviedol som, že riešenie poznám a na záver uverejním, zaujíma ma, ako by sa s tým popasoval niekto iný.

@vovka: marjankaj určite tuší, ako shapes zgrupovať, na tom skutočne žiadna veda nie je

ad zobrazenie komentára pri prechode myšou nad bunkou? V podstate žiadny veľký problém, pokiaľ sa vie, ako na to. Pokiaľ to niekoho zaujíma, môže sa inšpirovať z doleuvedených linkov, je to ale už trochu iná liga než to, čo uvádza vovka. Je to ale dobre popísané a pochopiteľné:

http://www.clearlyandsimply.com/clearly_and_simply/2012/11/roll-over-tooltips-and-web-actions-on-a-microsoft-excel-dashboard.html
http://optionexplicitvba.blogspot.cz/2011/04/rollover-b8-ov1.html
http://chandoo.org/wp/2011/03/31/excel-hyperlinks/

No, mňa porazí asi tiež, ale z niečoho iného.
Zakúpil som verziu professional 2016 a nie 365 z dôvodu, že v 365 údajne nie je integrovaný Power Pivot či Power View, ako som sa dozvedel pred nejakou dobou v nejakej internetovej diskusii. Neviem, nakoľko je táto informácia presná a ktorej verzie 365 sa týka, každopádne, v tých verziách vzniká podľa môjho názoru trochu chaos. No nič, z hore uvedeného dôvodu som volil nákup "doživotnej" verzie Pro 2016, nie 365. A teraz zisťujem, že nové funkcie budú/sú k dispozícii iba pre 365. Takže skvelé. Nie, že by som bez nich nevedel existovať, ale trochu mi to vadí, nie že nie. Hlavný problém ale vidím v tom, že súbory s takýmito funkciami už nebudú funkčné ani v rámci rovnakej "časovej" verzie office (2016), takže k backward compatibility pribudol ďalší problém. Vhodnosť používania týchto nových funkcií je o to viac diskutabilná. Faktom je, že MS tlačí hlavne na predaj 365 licencií, kto chce "doživotnú" licenciu, musí za A trochu viac hľadať na stranách predajcov a za B je potom trochu bitý, keď zistí veselú novinku podobnú tej z tohoto vlákna....

vovka, púhe konštatovanie, že používanie hesiel nezabráni zobrazeniu obsahu a na druhej strane poskytovať návod, ako sa k takto chránenému obsahu dostať, sú dve rozdielne veci.

Asi som retardovaný, ale pokiaľ v prvom odstavci napíšete, že ctíte zásadu zaheslovaný kód neprelamovať a v závere svojho príspevku jeden zo spôsobov, ako na to, vykvákate na fóre, tak priznám sa, tomu skutočne nerozumiem. Už pred nejakou dobou ste mal potrebu pochváliť sa pri podobnej téme, to nutkanie je asi silnejšie než vy.

"ak to bude čokoľvek od vývojárov z tohto fóra tak do toho nejdem" - to má akože stačiť? Pokiaľ bol teda autorom niekto iný, tak tomu to kľudne hackneme, to je žart, nie? Byť adminom, tak toto by malo byť v pravidlách fóra a za uvedenú snahu výstraha a pri pokračovaní nemilosrdný ban.

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje