Mulla on excelpohja, jossa lasketaan makroilla ja sitten tulee yes/no-kysymys MsgBoxilla.
Joskus se menee läpi suit sait, toisinaan esim. aikaväli ennen ja jälkeen MsgBoxin voi kestää minuutteja. Boxi ilmestyy, mutta rinkula vain pyörii. Missä mättää?
Aika = Now
Debug.Print CDate(Now - Aika) & " Odotetaan vastausta"
Response = MsgBox(tx(15), vbYesNo)
Debug.Print CDate(Now - Aika) & " Vastattu"
Joskus se menee läpi suit sait, toisinaan esim. aikaväli ennen ja jälkeen MsgBoxin voi kestää minuutteja. Boxi ilmestyy, mutta rinkula vain pyörii. Missä mättää?
Aika = Now
Debug.Print CDate(Now - Aika) & " Odotetaan vastausta"
Response = MsgBox(tx(15), vbYesNo)
Debug.Print CDate(Now - Aika) & " Vastattu"
Vastaukset 1
Vanhimmat
Nyt toimii normaalisti. Jätin pois ennen laskentaa olevan rivin.
Application.EnableEvents = False
Se oli jäänyt vanhojen kokeilujen jäljiltä. Ymmärtääkö joku, miksi se useimmiten tekee kaiken ihan älyttömän hitaaksi, mutta ei ihan aina?