Příspěvky uživatele

Ja by som sa na to, Karlíku, nevykašľal. Ale bohužiaľ, v túto chvíľu mi chýbajú potrebné znalosti :(.
Ide mi skutočne o to, aby kód k tomuto konkrétnemu projektu zostal pokiaľ možno utajený, a bohužiaľ vieme, že zaheslovanie poskytuje pomerne slabú ochranu.

niečo, čo zvládnem bez znalosti programovania v C# apod. Moja predstava bola nejaký konvertor kódu :). Ale som asi naivný, tak jednoduché to nebude. Vydal som sa zatiaľ cestou znejasnenia (obfuskácie) kódu vo VBA. Ale i to je pomerne prácne, pokiaľ sa deje manuálne, a človek pri tom musí byť pozorný, aby kód ponechal i po zneprehľadnení funčný..

Ahoj,

potreboval by som z jedného Add-in (XLAM) vytvoriť COM add-in. Má niekto tip na rýchly a bezbolestný postup?

Nepriamy odkaz nefunguje v kombinácii s 3D.

Geometrická? Skutočne?

mno, narozdiel od Maxima by som sa ku kalendárnemu systému 1904 uchýlil až v prípade najvyššej núdze

vec sa dá poriešiť jednoducho - naformátovaním bunky na formát General a prenásobením hodnotou 24. Čas je potom vyjadrený v dekadickom tvare, tj. 15 min ako 0,25 hodiny. Spätný prevod desatinnej časti hodín na minúty patrí potom už medzi úlohy riešené na prvom stupni ZŠ.

1000; 995; 990; 940; 915; -335
je aritmetická alebo geometrická postupnosť?

chlapci, mám za to, že pavelo chce na liste2 vzorec
=SUMA(List1:List2!G20)
na liste 3 potom =SUMA(List1:List3!G20) atd.

ale chce to vzorcom, ktorý bude mať na každom liste rovnaký tvar

pokiaľ to tak je, tak to žiada istú predprípravu, svoj pokus o riešenie dávam v prílohe.

Alebo makrom..

Sub test1()
Const i As Double = 5.24785
Dim j As Byte
j = WorksheetFunction.Ceiling(i, 1)
Debug.Print j
End Sub

Sub test2()
Const i As Double = 5.24785
Dim j As Byte
j = WorksheetFunction.RoundUp(i, 0)
Debug.Print j
End Sub

Sub test3()
Const i As Double = 5.24785
Dim j As Single
j = Sgn(i) * (Sgn(i) * Fix(i) - ((i - Fix(i)) <> 0))
Debug.Print j
End Sub

megavzorce (a maticové) vzorce používam z mnohých dôvodov, uvediem namátkou len dva:

1. Kvôli prehľadnosti. Pokiaľ mám v tabuľke mnoho stĺpcov s konštantami, nepotrebujem ďalších x stĺpcov s pomocnými výpočtami, ktorých výsledkom má byť jedna finálna hodnota. Fakt z duše neznášam, pokiaľ som nútený používať vodorovný posuvník.

2. Megavzorec môžem do príspevku nakopírovať a nemusím sa potom zdržovať s prikladaním prílohy.

Skrývanie, ukladanie pomocných výpočtov inam atd. má tiež svoje úskalia.

Pokiaľ potrebujem megavzorec dekomponovať aby som ho pochopil, nie je to nič, čo by som nezvládol.

Používanie megavzorcov nikomu nevnucujem, pokladám to za vec vkusu. Inak sa ale musím pozastaviť nad názorom, že použitím megavzorca chce niekto na niekoho urobiť dojem. Vovka, keďže megavzorce nepoužíva, dojem teda podľa uvedenej logiky dojem robiť nechce, ide mu teda o to, aby sa zdalo, že nemá potrebné znalosti? To je asi nezmysel, že?

...za dobrotu na žebrotu

inak, toto je skutočne perla: a.mlady na WALL.CZ, byl mantala. Mě to pomohl udělat jinej admin pomocí PM a odpověď mi zaslal na email. Nevím na co příloha, když zadání je jednoduché:

Pokiaľ by si mal za riešenia platiť, zistil by si veľmi rýchlo, či je pre teba výhodné dať prílohu, ktorá by ti ušetrila peniaze. Ale načo plytvať časom, keď to pre teba urobí nejaký blbec vždy zadarmo, že?

@lubo
kód som písal v noci, ráno pred odchodom do práce som prišiel na problém s vbTextCompare, tak som na to upozornil. Podvedome som tušil, že riešením by mohlo byť binárne porovnanie, ale už som sa k tomu nedostal, páč som valil do práce. Problém c+h by som tiež riešil slovníkom.

Každopádne, díky za dobrý point a osvetlenie problému.

@eLCHa: A proč budeš ten tempsheet vůbec ukládat.
V tomto prípade skutočne nemusím, stačí použiť alternatívne workbooks.add, urobiť to v ňom a potom zavrieť, ale to je detail. Ide o to, že sa dá použiť triedenie priamo v liste. Nebuď hnidopich :)

@eLCHa: ikdyž nachápu, proč do toho tahá tempsheet a Kill
buď temp sheet, triedenie na liste prostredníctvom vlastnosti sort, potom kill temp
alebo celé pomocou bubble sort bez temp sheetu
t.j. uviedol som dva postupy

Nechcem sa hádať, kto čo pochopil, myslím ale, že nápad s temp a triedenie na liste som uviedol. Okrem toho, som naznačil i cestu vo VBA prostredníctvom funkcie StrComp. Stačí k existujúcemu poľu pridať nový záznam a zotriediť. Pokiaľ je stávajúce pole už zotriedené, tak stačí v cykle porovnať nový záznam s existujúcimi hodnotami (opäť pomocou StrComp) a nový záznam potom priradiť do poľa na patričnú pozíciu, predtým všetkým nasledujúcim priradiť pozíciu o jednu vyššiu.

StrComp nie je stopercentný, ale ani triedenie na liste nefunguje vždy korektne. Príklady, kedy to nezafunguje presne ani v jednom z uvedených prípadov, sú napr. dvojice slov:
môj - mojmír
můj - muller

neporadí si to pravdepodobne vždy ani s dvojicou znakov c a h, napr v slove viachlavý sa nejedná o ch, ale o c a h..

Každopádne, moja rutina dáva rovnaný výsledok, ako dosiahneš triedením na liste.

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje