Excel VBA質問箱 IV

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

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


27869 / 76732 ←次へ | 前へ→

【54176】データ取得先のファイルが変更するたびに反映先の行を変更するには?
質問  かおり  - 08/2/27(水) 18:01 -

引用なし
パスワード
   以前外部エクセルファイルの読み込みの件で質問させていただいた初心者です。

【質問その1】
p://www.vbalab.net/vbaqa/c-board.cgi?cmd=one;no=53688;id=excel
【質問その2】
p://www.vbalab.net/vbaqa/c-board.cgi?cmd=one;no=53795;id=excel

前回の質問で、取得したデータを

          A B C D E           F G H I J K L…
1(ファイル1データ)1.,2.,3.,4.,5.,(ファイル2データ)1.,2.,3.,4.,5.,……
2(ファイル1データ)1,9,3,5,5,(ファイル2データ)1,6,7,2,3,……

と、全てのファイルを参照し終えるまで取得した値を右方向に並べるコードを教えていただきました。

  Y = Y + 1
  Worksheets("ワークシート").Cells(1, 1 + Y).Select    
  ActiveCell.FormulaR1C1 = bunrui 'ラベルの名前の部分を表示
  ActiveCell.Offset(1, 0).Select
  ActiveCell.FormulaR1C1 = suuchi ’ラベルの%の部分を表示
  ActiveCell.Offset(-1, 1).Select

今回は、参照先のファイルが変更になると、
反映されるセルの行を変更させたいのですが、どのようにコードを記述すればよろしいのでしょうか?

イメージ的には以下のようにデータを取得させたいです。


          A B C D E
1(ファイル1データ)1.,2.,3.,4.,5.
2(ファイル1データ)1,9,3,5,5
3(ファイル2データ)1.,2.,3.,4.,5.
4(ファイル2データ)1,6,7,2,3
5・
6・
7・


恐れいりますが、ご教授よろしくお願いいたします。(><)

0 hits

【54176】データ取得先のファイルが変更するたびに反映先の行を変更するには? かおり 08/2/27(水) 18:01 質問
【54180】Re:データ取得先のファイルが変更するたび... VBWASURETA 08/2/28(木) 11:08 回答
【54183】Re:データ取得先のファイルが変更するたび... かおり 08/2/28(木) 14:21 質問
【54188】Re:データ取得先のファイルが変更するたび... VBWASURETA 08/2/28(木) 18:34 回答
【54208】Re:データ取得先のファイルが変更するたび... かおり 08/2/29(金) 16:53 お礼

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