【マクロ】　UWSC　Part3　【シェアウェア化】

【マクロ】　UWSC　Pa ..

57:50
07/05/06 23:11:36 LdZaxQzq0
>>55
頼む相手を間違えてる気もするけど…まあいいかw 全30行。

IE = CREATEOLEOBJ("InternetExplorer.Application")　 // IE起動開始 ---
IE.visible = True
IE.navigate("URLﾘﾝｸ(biz.yahoo.co.jp)) // ※ページ変えました
REPEAT
SLEEP(0.1)
UNTIL !IE.BUSY AND IE.readystate = 4 // 以上、シンヤ本よりﾍﾟﾀﾘ ---

SCKEY(GETID("Yahoo！ファイナンス"), VK_ALT, VK_V)　 // Alt+V,C で「ソースの表示」
SCKEY(GETID("Yahoo！ファイナンス"), VK_C)
SLEEP(2)
SCKEY(GETID("IEキャッシュ"), VK_CTRL, VK_A, VK_C)　 // エディタからクリップボードへ全コピー
SLEEP(2)

次ページ