Hej hej
Wait funktionen pausar din kod till angivet klockslag. Nedan rad pausar i 45 sekunder. Finns det något sätt för dig att undersöka om queryn är klar så kan du loopa din wait funktion så du inte behöver pausa så länge.
Application.Wait(now + timevalue("00:00:45").
Möjligtvis så skulle du även kunna stänga av popup rutan
Application.DisplayAlerts = false
Samt frigöra arbetsminne genom att stänga av lite funktionalitet i excel innan du kör koden:
application.calculation = xlcalculationmanual
Application.Screenupdating = false
Glöm inte att slå på¨alla igen innan koden avslutas :)
Mvh
Christian
/c