< návrat zpět

MS Excel

Téma: Nekonečný cyklus rss

Zaslal/a Richard99 20.7.2012 9:59

Občas se chybyčka vloudí a v makru je nekonečný cyklus.
Makro lze ukončit pomocí ESC. Toto se nepodaří, pokud je v téoto smyčce msgbox, nebo formulář. Neví někdo jak toto ukončit elegantněji, než ukončením excelu?

Zaslat odpověď >
Strana:  1 2   další »
icon Poki(20.7.2012 10:14)#009060
Poki
co treba CTRL+Break?citovat
Richard99(20.7.2012 10:24)#009062
avatar
CTRL+BREAK taky nefunguje, CTRL+BREAK+enter funguje asi tak na třetí pokus.

Díkcitovat
icon Poki(25.7.2012 10:12)#009108
Poki
to je zvlastni - mne CTRL+Break funguje vzdycky perfektne i pri zobrazenych dialozich. M
uzes poslat ten soubor, zajimalo by me to...citovat
marjankaj(25.7.2012 10:47)#009109
avatar
Daj do cyklu počítadlo a pri dosiahnutí napríklad 1000 cyklov ukonči makro.citovat
Richard99(25.7.2012 11:25)#009111
avatar
Daj do cyklu počítadlo a pri dosiahnutí napríklad 1000 cyklov ukonči makro.

Cyklus vždy ošetřím tak, aby se to nestávalo, v průběhu ladění se vždy nějaká ta chybička vloudí.

to je zvlastni - mne CTRL+Break funguje vzdycky perfektne i pri zobrazenych dialozich. M
uzes poslat ten soubor, zajimalo by me to...

Kód poslat nemůžu ze dvou důvodů, jednak chyba byla už odstraněna a dále celkový kód obsahuje 7000 řádků. Pokusím se namodelovat situaci, která se stala a pak ti kód pošlucitovat
Richard99(25.7.2012 11:55)#009114
avatar
Tak s tímhle si ctrk break neporadí

Win XP MSOFF 2007 EN

Sub pokus()
For I = 1 To 10000
MsgBox "Nazdar"
Next I
End Subcitovat
icon Poki(25.7.2012 12:21)#009115
Poki
U me v pohode!
Pri zobrazenem MsgBoxu stisknu CTRL+Break a muzu si vybrat jestli chci proceduru ukoncit 'End' nebo 'Debug'...

Win XP, MS Office 2007 CZcitovat
Richard99(25.7.2012 12:48)#009116
avatar
Mě se při stisku ctrl break nic neděje.citovat
icon Poki(25.7.2012 13:50)#009117
Poki
nemate nahodou v kodu nekde toto:

Application.EnableCancelKey = xlDisabledcitovat
Richard99(25.7.2012 14:25)#009118
avatar
Ne to nemám, ale pohrál jsem si stímto kódem v immediate window a výsledek je zajímavý.

? Application.EnableCancelKey
1
Application.EnableCancelKey=xlDisabled
? Application.EnableCancelKey
1
Application.EnableCancelKey=xlErrorHandler
? Application.EnableCancelKey
1
Application.EnableCancelKey=xlInterrupt
? Application.EnableCancelKey
1citovat

Strana:  1 2   další »

Uživatelské menu

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

Menu

Formulář Faktura

Formulář Faktura IV

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

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje