< návrat zpět

MS Excel


Téma: Dočasné vypnutí Worksheet_Activate() rss

Zaslal/a 16.4.2019 8:35

Zdravím,

dá se prosím nějak dočasně vypnout funkce Worksheet_Activate()?

U listu "dodaci_list", mám tuto funkci nastavenu (přičemž díky této funkci čerpám data z listu "zakaznik"). Nyní jsem přidal tlačítko, pomocí kterého odesílám (pouze) list "dodaci_list" (resp. jeho kopii) jako outlook přílohu konkrétní osobě. Nyní mi nejde vygenerovat mail, jelikož samotná kopie listu "dodaci_list" nemůže logicky sahat do jiného listu (mailem odesílám pouze jeden list, nikoliv všechny).

Dá se prosím worksheets activate vypnout v okamžiku kliknutí na odsesílací tlačítko a znovu aktivovat po odeslání mailu resp. po návratu do původního souboru se všemi listy? Nějak to nemůžu rozlousknout.

za postřehy děkuji

Zaslat odpověď >

#043168
elninoslov
Tak len z hlavy. Buď použite pri stlačení tlačítka (vypína všetky udalosti)
Application.EnableEvents = False
... vykonanie makra ...
Application.EnableEvents = True

alebo si urobte globálnu premennú v module
Public DisableActivate as Boolean
a pri stlačení použite
DisableActivate = True
... vykonanie makra ...
DisableActivate = False

pričom zároveň do Worksheet_Activate()
doplňte na začiatok
If DisableActivate Then Exit Subcitovat
#043182
avatar
děkuji za pomoc. U druhého řešení jsem jen na začátek worksheet activate doplnil

If DisableActivate = false Then Exit Sub

fungujeto skvěle 1citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura III

Oblíbený formulář Faktura byl vylepšen a rozšířen. Formulář faktura III
Více se dočtete zde.

Aktivní diskuse