- 583 名前:名無しさん@お腹いっぱい。 mailto:sage [2012/01/11(水) 15:28:03.88 ID:aWCCUq4y0]
- UWSC初心者なのでサンプルを見ながら応用しているのですが、
伺いたいことがありカキコします。 エクセルのセルA1のURLをIEで開き、ある時間が経ったらA2のURLをIEで開く・・・ そんなプログラムを検討しているのですが、当方エクセルがありません。 そこで、Open Officeで製作したxlsファイルで同様の事ができないかググッているのですが、 なかなか見つかりません。 下記のプログラムを応用したいのですが、Open Officeへ変更できないものでしょうか・・・ EXCEL = CREATEOLEOBJ("Excel.Application") EXCEL.visible = True Excel.WorkBooks.Open(FileName :="C:\abc.xls") Excel.Range("A1").select URL = EXCEL.selection.value IE = CREATEOLEOBJ("InternetExplorer.Application") IE.visible = True IE.navigate(URL)
|
|