Excel VBA質問箱 IV

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

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


21829 / 76738 ←次へ | 前へ→

【60297】Re:2つの条件でのVLOOKUPをマクロで・・・
質問  モー  - 09/2/8(日) 17:41 -

引用なし
パスワード
   ▼n さん:
>>⇒このボックスを表示させずして,テーブルリストを参照しに行くことはできないでしょうか?
>数式内の参照Bookのパスと名前が正しければ、通常は表示されません。
>Bookのフルパスが正しいかどうか確認してください。
ありがとうございます。確認し,再度実行した結果表示されなくなりました。

>>実際にはファイル1のA列とB列にデータが入っている行までのC列をマクロで指定する方法
>データ状態によっていろいろとありますが
>Dim x As Long
>
>With ActiveSheet
>  x = .Cells(.Rows.Count, 1).End(xlUp).Row
>  MsgBox .Range("C2:C" & x).Address(0, 0)
>  MsgBox .Range("C2").Resize(x - 1).Address(0, 0)
>  MsgBox .Range("C2", .Cells(.Rows.Count, 1).End(xlUp).Offset(, 2)).Address(0, 0)
>  With .Range("A1").CurrentRegion
>    MsgBox Intersect(.Cells, .Offset(1), .Columns("C")).Address(0, 0)
>  End With
>End With

上記を実行して,結果はわかりました。
それぞれの行で,どういう処理がおこなわれているのか違いを説明していただけるとありがたいのですが。
よろしくお願いします。

ちなみに,
Sub Test()

Dim x As Long

With ActiveSheet
  x = .Cells(.Rows.Count, 1).End(xlUp).Row

End With
Range("C2:C" & x).FormulaR1C1 = _
     "=IF(ISERROR(VLOOKUP(RC[-2]&""-""&RC[-1],'D:\[テーブル.xls]テーブル'!R2C1:R999C4,4,FALSE)),"""",VLOOKUP(RC[-2]&""-""&RC[-1],'D:\[テーブル.xls]テーブル'!R2C1:R999C4,4,FALSE))"

End Sub

で,私がやりたかった結果は得られているような気がします。

0 hits

【60288】2つの条件でのVLOOKUPをマクロで・・・ モー 09/2/7(土) 19:59 質問
【60289】Re:2つの条件でのVLOOKUPをマクロで・・・ n 09/2/7(土) 21:33 発言
【60297】Re:2つの条件でのVLOOKUPをマクロで・・・ モー 09/2/8(日) 17:41 質問
【60322】Re:2つの条件でのVLOOKUPをマクロで・・・ n 09/2/9(月) 22:55 発言
【60440】Re:2つの条件でのVLOOKUPをマクロで・・・ モー 09/2/21(土) 19:39 お礼

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