• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

Příspěvky uživatele

@ poki
Áno je to tak
Application.EnableEvents
to vyrieši.
Najprv chcel vyhodiť tlačítko, tak som to naprogramoval na udalosť zmenu v bunke K1. A potom tam to tlačítko zase dal, a tá jeho procedúra tu bunku K1 menila.

Asi by mal tú udalostnú procedúru vyhodiť a dať to späť na tlačítko.

A čo sa týka premennej riadok, tak použitá bola, ale zadávateľ to vyhodil. Nie je treba deklarovať, ak nie je deklarovaná, tak je to typ variant. Pri type integer by sa pár bytov ušetrilo.
Integer 2 byty
Long 4 byty
Variant 16 bytov

Sub Zlava(riadok as integer)

No dobre si to pomrvil s tými podmienkami.
Chcel si to takto nejako?

Prípadne si vzorce môžeš zjednodušiť

=SUM(IF((entry_price-B5)>mae;-B5*insert_tick_currency*;IF((entry_price+C4)>=mfe;C4*insert_tick_currency;C4*insert_tick_currency))*(entry_price<>""))

alebo

=SUM(((-(entry_price-B5)>mae)*B5*insert_tick_currency*+((entry_price+C4)>=mfe)*C4*insert_tick_currency+((entry_price+C4)<mfe)*C4*insert_tick_currency)*(entry_price<>""))

@stalker
Presne tak.
1. a 3. podmienka vracajú pole
a 2. podmienka iba jednu hodnotu
Podmienky treba poriadne ukončiť, potom sa to správa inak ako si predstavuje zadávateľ.

Asi by si mal priložiť súbor.

Kod na vymazanie si doplň sám.

Buňky se mi ale zamykají hned po zápisu hodnoty a nejde ji již při překlepu změnit. bylo by možné, aby se uzamčeli až po uložení?

A po tom uzamčení to chceš znovu uložiť? Alebo ako?

Môžeš použiť aj vlastný formát bunky. Napríklad
"Celkový součet je "# ##0,00

Alebo vzorec
="Celkový součet je "&ROUND(A1;2)

Round=Zaokrouhlit

No neviem ako si to robil, ale mne vyšlo toto.

@eLCHa
Ve druhém případě se jedná o číslo a tak není problém:
00000000/00
Stačí zadat 5211202
mne toto nefunguje excel 2010 a Win XP
Musel som pridať spätné lomítko
00000000\/00

@eLCHa
Stačilo, ale zadávateľ tam zrejme bude chcieť iné hodnoty ako 1;2;3;4;5;6;7. Možno 1,5;2;2,5;2;2;...

Najjednoduchšie je to ako uviedol eLCHa.
makro je zbytočné a po funkciách zostanú zbytočné smeti.

@eLCHa
Ešte jednoduchšie ako moje. Trochu mi robili problém české a anglické funkcie.

@kyblik
A čo funguje? Čo je správne 6 alebo 7?

No neviem, čo myslíš pod tými iteráciami, ale ja som tam našiel tých delení iba 6.

=int(log(100)/log(2))

Alebo ak chceš

=int(log(100)/log(2))+1

A nechceš napísať, čo vlastne chceš?

Pridaj si tam ten tučný riadok riadok

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Call obnov
Application.EnableEvents = True
Target.Select
End Sub

A zakázať makrom kopírovanie? Tak to netuším ako.

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse