Příspěvky uživatele

Ještě poprosím jeden dotaz.
Když si otevřu sešit a mám ho otevřený celý den,průbežne s ním pracuji, je možné naprogramovat nějakou proceduru, která např. za předdefinovaný čas např.2 hodiny, zobrazí nejaký formulář s upozorněním, že mám něco udělat? Nebude to blokovat nějak práci se sešitem, nebo možnost spouštění jiných maker v tomto sešitu...když to bude na pozadí počítat ten čas?

super, díky

Máte pravdu. To nevadí.Chtěl jsem porozumět jak komplikované by to bylo.

..a jak by vypadal kod Jen pro to, že se po otevření formuláře Bude blikáním zvýrazňovat nějaký prvek/label?
..bez odpočítávání času, jen prostě visuálně zvýraznit.
Bude to tolik příkazů jak v předchozích variantách?

..tak v tom se budu muset pohrabat déle,ale principielně je to co jsem chtěl. Děkuji oběma.!

Tohle přeblikávání mi bohatě stačí,
jen bych to potřeboval víc pochopit, a´t si to aplikuju i jinam.

Mohl by jste osvětlit k čemu jsou a proč:
Public Seconds As Integer
Public SemiSeconds As Integer
Public AllSeconds As Integer
Public AllSemiSeconds As Integer
Public TimerID As LongPtr

a obecně ten princip, co který řádek provede?

A Když budu chtít aby se form.otevřel , rozblikal a neukončil se,až pokud ho sám nezavřu, stačí pouze smazat tohle?

..If SemiSeconds >= AllSemiSeconds Then Unload UserForm1 ?

...bude form reagovat na další tlačítka spouštějící jiná makra co si tam dám atd? Nemusím ty timery nějak ukončovat?

P

Nastuduju, děkuju. Hezký večer.

Pardon, včera se to pořádně přetiahlo. Nestihol som. Teraz ráno som to ještě trochu prerobil, len už nestíhám, a nevím či som správně zeditoval všechny popisy. Dejte vědět. Riešené pomocí kolekcií. Aj unikátnosť aj vzostupné zoradenie. Na počet a súčet klasických WorksheetsFunction.
Příloha: zip53381_countifs.zip (31kB, staženo 1x)

PavDD napsal/a:

Dobrý den Barthe,

to je na mě trošku moc, nevím ani jak to nacpat do listu.

Nešlo by to trochu přiblížit?

Děkuju

P

Zřejmě stejně nesplnilo zadání, bylo různě náročné. 7
Záměrem byla pouze ukázka použití sumif a countif ve vba.
Zkopírovaný kód stačí vložit do modulu ve vba a sub si spustit (F5) či odkrokovat (F8), případně ho spustit pomocí tlačítka v listu s tím rozdílem, že se místo formuláře zobrazí listbox přímo v listu sešitu.

OK, děkuji, i z toho něco pochytím. Hezký večer.

Děkuji, tak jsem si to představoval.

Ještě detail, nezávisle na to Pruhu, chci ve formulářích nechat měnit i barvu např Label1 po určeném časovém intervalu, třeba 0,5 vteřiny/zkrátka aby to "blikalo" .Ale nevím jak a kam bych to měl napsat, do Initialize formuláře, nebo Activate ?

.. něco jako :
UserForm1.lblSeconds.BackColor = &HFF80FF 'ruzova &H00FF80FF&
UserForm1.lblSeconds.BackColor = &HFFC0C0 'FIALOVA

Díky
p

Jestli můžu poprosit i Vaše řešení, Elninoslov.
Děkuji

Dobrý den Barthe,
to je na mě trošku moc, nevím ani jak to nacpat do listu.
Nešlo by to trochu přiblížit?
Děkuju
P

Zdravím.
Potřeboval bych docílit toho, že po otevření formuláře /obsahuje vesměs jen informativní hodnoty/ se tento formulář uzavře po uvedené době a zbývající čas se bude zobrazovat graficky pruhem/např:
1. prostřednictvím ProgressBar1
2. probarvujícím se pruhem Label2
3. do Label3 se i ukáže kolik zbývá z celkového času. např 8/10 8sec z 10s atd
Děkuji za pomoc.
P

Dobrý den,pomohl by prosím někdo?
Dělám si malé statistiky .
V tabulce excelu bych si vyfiltroval např rok2022 a pak udělal sumu sl.B.
ALE

potřeboval bych to udělat ve formuláři:
vybrat si z vyskytujících se možných roků ze sl.A a možných hodnot sl.B - nabídne se v ComboBox1,ComboBox2
a do
Label8 doplnit počet těchto vyfiltrovaných hodnot a do
Label9 doplnit součet těchto hodnot

Prosím k řádkům i popis co dělají, pro další mé modifikace a pochopení principu.
Děkuji.

Musím běžet,mrknu později. Děkuju a hezký víkend.

Možná to nemám provádět ve form-initialize ale v activate ?

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje