ああ忘れてた
これか
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
で
Private Sub Sleeptest()
Sleep(1000)
End Sub
でいいのか

＞ie.BusyがFalseになるかie.ReadyStateが4になってほしい時間を設定しないと。

そんなの設定できんの？
ようするに、Sleep(その設定した時間)にすりゃいいってことかい？