• 締切済み

VBAでWeb上のテーブル内の値を取得

IEで開いているWeb上にテーブル(表)があります。 テーブル上の指定の場所の値を取得したいのですが、「VBAを使って取得＆エクセルに貼り付け」って出来ますか？ フォーム内の値なら、ソースに「NAME」などがあるので値を取得することが出来るのですが テーブルの場合、そういうのが無いので困っています。 宜しくお願いします。

みんなの回答

noname#140925
noname#140925
回答No.1

以下のページを参考にして、IEオブジェクトから希望するテーブルを取得し、各TDタグの中身を拾ってExcelのセルに貼り付ければ実現できると思います。（以下のサンプルが理解できれば、の話ですが。） [参考]選択IEオブジェクト取得関数 http://hp.vector.co.jp/authors/VA036013/script/GetSelectedIEObject.html

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • HTMLのテーブル内の値

    下記のサイトのようにHTMLのテーブル内の値を取得したいのですが、 自分が取得したいテーブルにはIDもNAMEもありません。 どうしたら、値を取得できるのですか？ 宜しくお願い致します。 http://www2s.biglobe.ne.jp/~iryo/vba/IE/hdata1.html

  • VBA IEの Vallue　の値を取得　して保存

    VBAでIEのVallueの値を取得して 指定した場所に .txt　として保存する方法はありますか？ ありましたらやり方を教えてください。

  • VBAでWebページにセルの値を入力

    エクセルＶＢＡを用いて指定したセルの値を 表示中のWebページにあるテキストエリア等(よくある入力フォーム)に入力する というものを作りたいのですが、 IEとの連携がよくわかりません。 似たようなもので、googleページを自動で開き、 テキストエリアに検索語句を入力し、ボタンを押す というもののソースがありました。 下記のページの３番です。 http://www.hatena.ne.jp/1137216805 これを応用できるかなと思ったのですが、 うまくいきません。 ・表示中のページに入力したいので ie.Navigate ("http://www.google.co.jp/") この部分が必要ありません。 呼び出したページではなく、表示中のページを ie.document.allの対象にするにはどうすればよいのでしょうか？ また、他にも良いやり方がありましたら、教えてください。 よろしくお願いします。

  • VBAでその月の数の一番多い値を取得したいのですが

    フィールド1 フィールド2 2016/08/07 52.6 2016/08/06 52.2 2016/08/05 52.2 2016/08/04 52.9 2016/08/03 53.6 2016/08/02 53.3 2016/08/01 53.1 と言うデータがテーブルには入っています。 アクセスのVBAでその月の数の一番多い値を取得したいのですが strMAX = DMax("[フィールド2]", "テーブル1", "[フィールド1] = '" & ??? & "'") 上記の？？？の部分はどうすればいいでしょうか？ 日付をフィルタするのではなく 「８月の中で一番多い値」を指定するにはどうすればいいでしょうか？ 結果としては、53.6を取得したいです。

  • Excel VBA: ピボットテーブルの値貼り付け

    タイトルのとおりなのですが、ピボットテーブルを含むシートを新しいシートとして値貼り付けするようなVBAはどう書けばよいのでしょうか・・・？ ご教授下さい。

  • VBAを用いて、ウェブからデータを取り込みたい

    エクセルＶＢＡでウェブからデータを取り込みたいと思い、いろいろ挑戦していますが、以下のやり方(1)と(2)は失敗中です。 取り込みたいのは、ウェブページ中に描かれてある「表」の部分のデータです。 アドバイスをお願いいたします。 ◆◆◆◆◆失敗(1)◆◆◆◆◆ ActiveSheet.QueryTables.Add(Connection:="url;http://***省略***.htm", Destination:=Range("A1")) の方法の場合、取得したデータをエクセルシートに張り付けた場合に生じる文字化けがなおらず挫折・・・ QueryTableは文字コードを指定して読み込めないので困難という結論に至りました。 ちなみに目的のウェブページはshift-JISでcharsetされてますが、取得したいデータ部分はＳＱＬサーバーでUTF-8で記述されていると思われます。 →http://okwave.jp/qa/q7864296.html ◆◆◆◆◆失敗(2)◆◆◆◆◆ ユーザーフォーム機能から、WEBブラウザーコントロールを用いて目的のウェブページを表示する方法では、表示したウェブページの情報をエクセルシートに転記する方法が分からず挫折・・・ url_report = "http://****省略.htm" WebBrowser1.Navigate url_report 'ここから先、どうすればエクセルシートにデータ取得できる？ 上記(1)や(2)以外で他のやり方も含め、経験者の方のアドバイスをお願いいたします。 ウェブページ中の表データをエクセルシートにＶＢＡで自動取得したいのですが・・・何か良い方法がありますでしょうか？　((+_+))

  • Ａｃｃｅｓｓ97VBAにてオブジェクトの説明欄の内容を取得したい

    ACCESS97のVBAにて開発をしています。 データベースウィンドウに表示される、各オブジェクトの説明欄の値（テーブルやフォームなど、オブジェクトを右クリック-プロパティにて、「説明」という欄に入力したもの）を取得したいのですが、指定の仕方がわかりません。 前提としては、Microsft　DAO　3.5　Object　Libraryを参照設定に追加してあります。 テーブル名やフォーム名は、DocumentオブジェクトのNameプロパティにて取得できたのですが・・・ ご存知の方がいらっしゃいましたら、是非教えてください。

  • VBAで取得した値を更新クエリーの値にしたい

    MS-Access2000を使っています。 下記の方法で、ファイルの最終保存日を取得しているのですが、その日時をクエリーを使ってデータベースに登録しようと考えています。 しかし、VBAで取得した値をどうやって、クエリーに反映させてよいか解りません。 すみませんが、方法を教えてください。よろしくお願い致します。 １：フォームに「Filename」というテキストボックスを作り、フルパスでファイル名を入力します。 ２：VBAを起動して、内部で FileDateTime関数で日時を取得します。 　　　jikan = FileDateTime(Filename) ３：更新クエリーを使って、この「jikan」の値を「T_main」テーブルの「時間」という項目に登録したいのです。 3番の方法が解りません。よろしくお願い致します。

  • エクセルVBA　WEBからデータ取得　文字化け

    社内の業務管理システムにエクセルＶＢＡでＩＥ経由のアクセスをして表のデータを取得し、エクセルのシートに転記したら文字化けします。原因として何が考えられますか？　アドバイスをお願いします。（UTF-8になってしまいます。） ●●●●備考●●●● ◆VBAのコード With ActiveSheet.QueryTables.Add(Connection:="url;http:***略***?no=112", Destination:=Range("a3")) .WebSelectionType = xlSpecifiedTables .WebFormatting = xlWebFormattingNone .WebTables = "1" .Refresh BackgroundQuery:=False .Delete End With ◆ウェブページはmetaタグでshift-JIS指定してあり、ＩＥでは正しく表示されます。 ◆他のshift-JISのウェブページ（例 http://www.tohoho-web.com/）なら文字化けせずデータ取得できます。

  • テーブルの値を１部取得は可能ですか？

    char table[] = { "a", "b", "c", "d", "e", } if(引数 == 1){ 　a,b,cのみの値を取得 } else{ 　a,d,eの値のみ取得 } このような事は可能でしょうか？ 調べていて別の人が書いたソースを参考ににcontinue文を見つけたのですが、この場合使ってもいいのか、どうやっていいのか分かりません。 ご教授願えませんか？ よろしくお願いします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する