Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


59694 / 76738 ←次へ | 前へ→

【21720】Re:webのテキスト文字をexcelに張り付けていくマクロについて
質問  takeshi E-MAIL  - 05/1/28(金) 0:03 -

引用なし
パスワード
   りすりすさん。
こんばんは。
この問題ですが、どこから手をつけていいのか
検討もつきません。
基本から勉強しなければならないと思うのですが。。
いただいたサンプルをexcelにとりこんで、該当するホームページは
開けるのですが。。
その後、画面に存在するボックスから
参照したい年を選んで、「次へ」を押すと、別のwindowが
開き、雨量データが表示されます。
そのデータをコピペーしてexcelに落としています。
この作業を自動で行うにはどのようにすればよろしいでしょうか。
正直いいまして、VB、javascriptの基本も知らないのです。
情けないお話ですが、そのようなソースのサンプルをいただければと思います。
よろしくお願いします。


▼takeshi さん:
>りすりすさん。
>下記情報ありがとうございます。
>初心者ですので頑張って作ってみようと思います。
>
>
>▼りすりす さん:
>>▼takeshi さん:
>>>りすりすさん。
>>>ご親切にありがとうございました。
>>
>>独学ではどこをいじっていいのか結構時間がかかることなので
>>OLEオブジェクトもJavaScriptも操作はほとんど同じなので
>>あとは、VBというより、JavaScriptの世界です。
>>
>>【ヒント】
>>表の下には、最初の表の中身がコピーされています。
>>
>>表の Hit2 をクリックすると、
>>上から2番目にHTMLの中身が表示されます。
>>
>>これだけ理解できれば、HTMLからデータ吸い出すのかんたんでしょう。
>>
>>
>>拡張子をHTMLにして、保存してIEで開くとわかるでしょう。
>>↓
>>
>>
>><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
>><html><head>
>> <title>new_page_1.html</title>
>></head>
>><body>
>><script type="text/javascript">
>><!--
>> function SelectMenu()
>>  {
>>   confirm("Hello World")
>>  }
>> function TestHit()
>> {
>>   MENU1.onclick();
>> }
>>
>> function TestHit2()
>>{
>> document.all.tags("TD")(1).innerText= "";
>> Str = document.all.tags("HTML")(0).innerHTML;
>> document.all.tags("TD")("MENU2").innerText= Str;
>>}
>>    //-->
>></script>
>>
>><table border="0">
>> <tbody>
>>  <tr>
>>   <td id="MENU1" onclick="SelectMenu(1);" class="menu" align="center" bgcolor="#ff00ff" height="27" nowrap="nowrap" valign="middle" width="185">メニュー1</td>
>>  </tr>
>>  <tr>
>>   <td id="MENU2" onclick="SelectMenu(2);" class="menu" align="center" bgcolor="#ff00ff" height="27" nowrap="nowrap" valign="middle" width="185">メニュー2</td>
>>  </tr>
>>  <tr>
>>   <td top="" onclick="TestHit();" style="background-color: rgb(255, 255, 204); text-align: center;">Hello
>>World<br>
>>   </td>
>>  </tr>
>> <tr>
>><td top="" onclick="TestHit2();" style="background-color: rgb(255, 255, 204); text-align: center;">Hit2<br>
>></td>
>></tr>
>> </tbody>
>></table>
>>
>><script type="text/javascript">
>><!--
>> document.open();
>> document.write("<pre>");
>> for (i = 0; i < document.all.tags("TD").length; i++)
>> {
>> document.writeln(document.all.tags("TD")(i).innerText);
>> }
>> document.write("</pre>");
>> document.close();
>>// -->
>></script>
>>
>></body></html>
0 hits

【21599】webのテキスト文字をexcelに張り付けていくマクロについて takeshi 05/1/24(月) 20:07 質問
【21605】Re:webのテキスト文字をexcelに張り付けて... りすりす 05/1/24(月) 21:27 発言
【21607】Re:webのテキスト文字をexcelに張り付けて... takeshi 05/1/24(月) 22:08 お礼
【21613】Re:webのテキスト文字をexcelに張り付けて... りすりす 05/1/24(月) 23:44 発言
【21681】Re:webのテキスト文字をexcelに張り付けて... takeshi 05/1/26(水) 16:00 お礼
【21720】Re:webのテキスト文字をexcelに張り付けて... takeshi 05/1/28(金) 0:03 質問

59694 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free