Hej!
När jag uppdaterar external data med refresh all så vill jag kunna uppdatera exelarket innan jag går vidare med macrokoden. Försökte med följande kod.
<code>Application.Wait Time + TimeSerial(0, 0, 10)</code>
Men uppdateringen väntar inte på denna, utan koden kör vidare utan att refresh data är klar. vad skall man använda till detta ni som är lite mer kunniga än jag?.
Jar kör en auto_open vid start.
<code>
Sub Auto_Open()
'Uppdaterar exelbladet
Dim i As Long
For i = 1 To Sheets.Count
Sheets(i).Unprotect Password:="test"
Next i
ActiveWorkbook.RefreshAll
Sheets("sammanställning").Select
Range("I14").Select


Application.Wait Time + TimeSerial(0, 0, 10)

Call Macro1

End Sub
</code>

Hej!

Ersätt

<code>Application.Wait Time + TimeSerial(0, 0, 10) </code>

med

<code>Sleep (10000)</code>

För att detta skall fungera måste du skriva in följande deklaration i din modul eller form (förslagsvis längst upp)

<code>Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)</code>

Lycka till!

Hej!
Tackar för hjälpen, Funkade precis som det var tänkt nu.