人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

Excel VBAを使用してwebクエリでSheet1のB2セル?B3、B4・・・と複数のURLからデータをループで取得し、Sheet2のA1セル?A2、A3・・・と表示しています。
取得データの内容が3行だと仮定すると、通常であれば以下のように表示されると思います。

━【A】━
【1】B2セルURLの取得内容
【2】B2セルURLの取得内容
【3】B2セルURLの取得内容
【4】B3セルURLの取得内容
【5】B3セルURLの取得内容
【6】B3セルURLの取得内容
・ ・
・ ・

これを以下のように、取得したデータを横に表示することはできないでしょうか?

━【A】━ ━【B】━
【1】B2セルURLの取得内容 B2セルURLの取得内容 B2セルURLの取得内容
【2】B3セルURLの取得内容 B3セルURLの取得内容 B3セルURLの取得内容
・ ・ ・
・ ・ ・

当方VBA初心者ですので、できるだけわかりやすくご教授頂けると助かります。
よろしくお願いいたします。

●質問者: colorbox0831
●カテゴリ:コンピュータ
✍キーワード:?B A1 A3 b2 B4
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● spyglass
●60ポイント

VBAを使わずに単純に「セルの写し」ではダメでしょうか?

WEBクエリはWEBページのデータをそのまま取り込んでくるのでレイアウト編集は無理です。

ですのでSheet1はWEBクエリ取得専用ページとして取得のみを行わせます。

【1】B2セルURLの取得内容

【2】B2セルURLの取得内容

【3】B2セルURLの取得内容

【4】B3セルURLの取得内容

【5】B3セルURLの取得内容

【6】B3セルURLの取得内容

そうして例に表記されいたとおり、一旦縦方向の純粋なデータとして取得します。

その後、実際に横方向にレイアウトするのはSheet2に表示としてみては如何でしょうか?


Sheet2へ縦横に整列されたデータを表記するのは単純に「セルの写し」を使います。

具体的にはSheet2のセルA1に

=Sheet1!A1

上記の様に式を設定するとSheet1のA1セルの内容を引っ張ってきます(セルの転記)

次にSheet2のセルB1には

=Sheet1!A2

これで横方向へ表示できます。

次にSheet2のセルC1には

=Sheet1!A3

これで良いですね。


因みに次にSheet2のセルA2には

=Sheet1!A4

これで2段目も表示できます。


http://q.hatena.ne.jp/

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ