• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: Aktualizace databaze a čekání na aktualizaci

Zaslal/a LeslieBrown 20.12.2013 22:54

Ahoj, mám tady makro, které mě zaktualizuje konrkétní sheet a za tim makrem mám vložene další příkazy, které mě mají stažené data upravit do takého formátu, jaký chci... jenže...

Sub Refresh_Query()
Sheets("Sheet1").Select
Range("B6").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
End Sub

Uvedené makro mě udělá refresh Listu 1, jenomže ono mě to nečeká, dokud se to všechno zaktualizuje ale hned to leze na další příkazy a nečeká na refresh.

Šlo by za to refresh makro vložit neco, co by udělalo to, že další příkazy se mě nespustí dokud neproběhne refresh celého sheetu?

díky

Zaslat odpověď >

---

Megan(24.12.2013 23:57)#016923

To je běžné, externí odkazy jsou "jen" rozběhnuté, na výsledek je nutno si počkat. Pokud znáte/odhadnete čas na nutnou aktualizaci, použijte něco jako

If Application.Wait(Now + TimeValue("0:00:30")) then
' zde pokračování po 30 sekundách posečkání
End If

Zdarcitovat

Palooo(30.12.2013 8:45)#016972

Private Sub qTable_AfterRefresh(ByVal Success As Boolean)
end sub

idealnejsie je pouzit event ktory sa zapina az po skonceni refreshucitovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse