Příspěvky uživatele

Zdravím. prosím jak vyladit formulář a kod.
Chci , před otevřením sešitu zobrazit okno, kde jede odpočet, který odpočítá 5sec a pak spustí další proceduru. A pokud do této doby stisknu tl Storno, tak aby se tento form.HNED uzavřel a jen otevřel sešit.

Nyní , když stisknu Storno, stejně to čeká ...na pozadí až to odpočítá temch 5 sec.
Jde to nějak?...okamžitě všechny makra přerušit
Možná by pomohlo obecně vysvětlit, jak funguje v obecném formuláři tlačítko Storno, a tl Přerušit. Přerušit taky ukonší chod makra?

A ještě jeden dotaz, lze schovat křížek v pravém rohu formuláře?

Chci při startu zobrazit okno s informacemi o produktu, a vyžaduji třeba těch 5 sec.aby to uživatel viděl a nemohl to vykřížkovat. Má to prakticky každý program , když startuje.

Díky za tipy

Díky

Děkuju za tip. Poperu se zatím s tímhle, uvidím co bude stačit a vyhovovat. Je to ve fázi vývoje .
Děkuju.

...a šířka sloupců ve form se přebírá z tabulky , nebo se dá taky nějak upravit, zúžit?

super,Děkuji
a jak by se dalo vybrat jen některé sloupce ? např sl A,N,O

'Set rgOblast = Range("B5").CurrentRegion - je asi vyber celé tabulky že ?

Zdravím,chi se zeptat , jestli jde ve formuláři zobrazit část listu excelu, tzn jako tabulku.
Označím si oblast(např A1:Q8) a zobrazím ji ve formuláři. Je na to nějaký prvek?
Díky

Dobry vecer.
Nevite,da se z excelu odesilat sms? Nasel jsem ruzne vyribce doplnku ale vsechny se odkazuji na placene sms brany. Neresil to uz nekdo ..bezplatne... Kdyz sms ma dnes kazdy ke svemu tarifu.

Díky...je to boj.

Potřeboval bych prosím vyextrahovat z textu :
objednávky činí 921,49 CZK bez DPH (1 115,00 CZK s DPH).

zprava jen tu cenu 1 115,00 .
tzv zleva od závorky po mezeru před CZK.
Děkuji

Děkuji

Zdravím všechny
Na listu tab Mám vytvořenou tabulku pojmenovanou TabHardware,
chci ji filtrovat podle proměnné s názvem 'Klient'
Když mám v kritériu ...Criteria1 _:=Klient ..což je proměnná, nic se nevyfitruje. Když tam dám natvrdo něco do"jmeno" , tak to jde.

Filtrovat nelze s použitím proměnné ?
Díky za tip

Dim Klient As String

Worksheets("tab").Select
Range("A1").Select
'filtrujeme tab podle 'Klient'
ActiveSheet.ListObjects("TabHardware").Range.AutoFilter Field:=12, Criteria1 :=Klient

--jak jednoduché. Děkuji

popř. jak jednoduše zjistit z označené oblasti Adresu první/horní a poslední dolní bunky.

Prosím, mám označenou oblast:
Range(Selection.End(xlDown), Selection.End(xlToRight)).Select

Jak ji lze uložit do proměnné, abych ji mohl použít např.v :

takto mi to funguje
MaxHodnota = WorksheetFunction.Max(Range("N2:N323"))

tady chci nahradit tou výše vybranou oblastí. nefunguje
MaxHodnota = worksheetFunction.Max(Range(Selection.End(xlToRight), Selection.End(xlDown)).Select)

nebo s použitím té proměnné Oblast - nefunguje
MaxHodnota = worksheetFunction.Max(Range(Oblast).Select

Tak ten přenos textu z emailu jsem vyřešil. Mám to už v buňce. Jen prosím odpovědi a příklad jak vycucnout to za dvojtečkama...

ZÁKAZNÍK: ing. Karel Novak
PRODUKT: Krabice atd
Hezký den

..obecný dotaz k té anylýze textu.
Tady doposud řešíme stále text v komentáři buňky v excelu.

Pro jiné účely:je možné zkopírovat si text např z těla emailu do Form/textBoxu a tam spustit to vyhledávání?
Zkouším to tam nakopírovat ručně , ale vloží se mi do textBoxu jen první řádek označeného textu-on neumí více řádků?
Musím ho kopírovat ručně, nebo jde napsat makro i do outloku,které z těla vybraného emailu, na který koukám, -nyní má vždy přesně definované struktury textu, samo vyextrahuje určená data? Makra z outloku budou umět pracovat se sešitem excelu?

Např.vždy tam bude:

Vážený partnere,

rádi bychom Vás informovali, blablabla.

ZÁKAZNÍK: ing. Karel Novak
PRODUKT: Krabice
POČET: 2
ID LICENCE: xxx-xxx-xxx
EXPIRACE: 9.3.2023

Uložit pak chceme do buněk vždy to co je za dvojtečkou.

Možná postup zbytečně komplikuju.
Nejsem programátor, jakou taktiku by jste na to zvolil,aby to vba zvládl?

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje