○開いているエクスプローラだけを処理していくルーチン For i=0 To GetALLWin()-1 Ifb "CabinetWClass" = Status(ALL_WIN_ID[i], ST_CLASS) Ifb False = Status(ALL_WIN_ID[i], ST_ICON) ここに必要な処理を書き込む Endif Endif Next