Příspěvky uživatele

Skontrolujte si to

EDIT: A okrej tých 2 vecí spomenutých v prílohe, ste sa vo vzorci odkazoval na D2:I2, ale požadujete (a má tam aj byť) D1:I1

Som iba na tablete, tak si to nepozriem, ale dobrá nastaviteľná fnc je tu. Keď som bol doma, stihol som otestovať, a funguje dobre a rýchlo.
http://www.cpearson.com/excel/randomnumbers.aspx

Stále je tu ale ešte otázka konkrétnej použiteľnosti. Ak sa to použije napr. na zamiešanie otázok v teste, tak nieje žiadúce, aby každé prekreslenie, vyvolané napr odkazom na náhodnú hodnotu v nejakom vzorci, alebo dopísanie niečoho do listu vyvolalo kompletné prepočítanie náhodných čísel. V takomto prípade sa buď použije Iteračný výpočet pre zastavenie prepočtu alebo makro.

No tak skúste toto.

Tak tam skúste napísať:
EN/SK verzia
=RAND()*100+ROW(A1)/1000
CZ verzia
=NÁHČÍSLO()*100+ŘÁDEK(A1)/1000

PS: A ešte dodatok, ak máte EN Office tak oddeľovač parametrov ";" nahraďte ",". Uveďte teda akú máte jazykovú verziu, a čo znamená "nefunguje".

Ale ako si tak čítam, tak RANDBETWEEN bude fungovať v 2003 až po nahodení doplnku "Analysis ToolPak"
https://www.uvm.edu/~bnelson/computer/excel2003/loadexcelsanalysistoolpak.html

Doplnte do stĺpca D názov listu "Hárok6", uvidíte prepočet. Len dopĺňate názvy listov v D. Doplniť názov neznámeho listu, inak ako ručne, je možno iba cez makro. Zatiaľ je to nastavené na 10 listov v D, a 100 riadkov v každom liste. Rozsah si ľahko zmeníte. Názvy listov sa čítajú v Definovanom názve.

PS: Omluva za predošlú omylom odoslanú prílohu.

Riešenia od "marjankaj" uvedené do praxe:
Stačí takto ? Máte tam 2 listy, s 2 riešeniami.
Dopíšte si časov koľko chcete, a potom označte v stĺpci s výsledkom poslednú doteraz vypočítanú bunku, a za pravý dolný roh tejto bunky ju potiahnite myšou na taký počet riadkov, koľko časov ste si napísala, alebo koľko časom plánujete napísať.

Ak sa Vás to čo teraz napíšem dotkne, tak to v žiadnom prípade nieje cieľom, tak sa prosím neurazte.
Vy sa pýtate, aká je to funkcia, asi na to posledné "=B1-A1", čo "marjankaj" napísal, že ? V tom prípade by ste mali docela pouvažovať nad pár hodinami na YouTube či Google o tom, čo je to vzorec, čo sú bunky.
Ak sa pýtate na ten prvý vzorec, v tom prípade Vám odporúčam nápovedu Excel pre jednotlivé funkcie NAJÍT, ZLEVA, ZPRAVA, DÉLKA.
Ak sa pýtate na preklad ekvivalentných názvov CZ-EN, tak Vám ich tam kolega napísal (okrem DÉLKA=LEN).

Ak dobre pozerám na Váš vzorec, tak ten výpočet
(((AF13-AE13)*24)-0,5)-((AL13-AK13)*24)
sa vykoná iba a len v prípade, ak je Z13="". Tak nemôžete chieť aby bolo v Z13="J", ak tam musí byť "" aby výpočet prebehol. To je prvá vec.

Druhá je to, že či je v Z13="D" alebo Z13="S", výsledok je 7,1. Toto sa dá zlúčiť do jedného OR/NEBO. Tu rovnako nemôžete chcieť pripočítať k tejto hodnote 7,1 hodnotu 7 na základe Z13="J", keď v Z13 musí byť "D" alebo "S" aby to malo tú hodnotu 7,1.

A za tretie, mi vychádza že stačí iba nahradiť posledné "" vo vzorci týmto
IF(Z13="J";7;0)
pretože za iných okolností nieje možné "pripočítať" číslo 7, keď výsledok je stále "" - prázdna bunka (nie 0). Ani teraz sa nepripočíta, iba sa vloží.

Neviem, či to "skúmam" správne, ale nejako mi to nesedí...

Tu je čiastočné riešenie jednej časti problému, a to odchytenie kliku na bod:
https://social.msdn.microsoft.com/Forums/office/en-US/4f9abc39-149e-4f4e-9f62-56d38a93d02f/start-code-when-clicking-in-excel-chart, ale nefunguje to tak ako by bolo treba. Prvý klik je iba označenie série, druhý klik je vypísanie bodu. Zatiaľ neviem, ako to poriešiť.

Po úprave s Terminate, sa to u mňa už neprejavuje.

Keď budete niekomu faktúrovať 1 mld, tak to bude mať škaredo napísané ako tisíc miliónov : 1000.000.000,00

Ak v makre nastavíte separator pri otváraní súboru, tak prejde ten formát od AL:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.UseSystemSeparators = True
End Sub

Private Sub Workbook_Open()
With Application
.UseSystemSeparators = False
.DecimalSeparator = ","
.ThousandsSeparator = "."
End With
End Sub

EDIT: O minútu skôr Vovka, vynikajúce riešenie.

Premennú xlApp ruším až v BeforeClose udalosti. To som ju iba teraz pre testovanie rušil v behu makra, ako ste písal, aby som vyvolal situáciu, že čo sa stane, keď ju po dlhšej nečinnosti zruší Excel sám. A nič sa nestane. Excel si ju vytvorí. Žiadna inštancia mi nikde nevisí. Ale s prepáčením už kašlem na to. Je to, ako ste podotkol, zbytočné.

Nemáte tie dáta náhodou stiahnuté ? Ak áno pridajte ich ako prílohu. ŠÚSR asi minul málo mega na svoje stránky. Vo všetkých prehliadačoch sú u mňa nedostupné.

EIDT: No na tablete cez mobilný internet mi susr ide, na pevnom internete nie. No nič.

Môžete bližšie popísať (nie tak, že Vy viete o čom hovoríte, ale aby sme vedeli my o čom hovoríte), presne ktoré tabuľky máte na mysli, kde pribudne prázdny riadok, ktorý štát chcete s čím priradiť...

Ja Vás chápem, čo máte na mysli. Ale môj Excel ak má xlApp=Nothing, tak si ho sám vytvorí a použije. Ak nieje Nothing, tak ho nevytvorí ale iba použije. Jedine ma napadá, že to Excelácke "zabudnutie" nenastaví premennú na Nothing, ale kompletne zabudne aj deklaráciu. Proste urobí niečo iné ako len set Nothing. Pretože zo stavu set Nothing sa bez problémov sám dostane.

Rozširujúca otázka, myslíte, že cez RecordSet ADODB by to bolo riešiteľné ?

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje