ここから本文です

ExcelVBAについて ExcelVBAについて質問です。 ExcelでファイルAとファイルBが...

win********さん

2019/3/614:40:47

ExcelVBAについて

ExcelVBAについて質問です。
ExcelでファイルAとファイルBがあります。

ファイルAのa1とa2に入力されている値をもとに、
ファイルBでフィルターをかけたいです。
いろいろ試してみたのですがどれもうまいくいかなかったので、
どなたか、ご教授ください。
フィルター出力後はファイルAにデータを貼り付けます(←ここはできた)

補足ちなみに現在の様子です(途中はしょります)

Workbooks.Open Filename:=ファイルB.xlsm
sheets("シート名").select
range("B1").select

activesheet.range("$a:$v").autofilter find:=2,criteria1:="ファイルAのa1"(にしたい)
activesheet.range("$a:$v").autofilter find:=3,criteria1:="ファイルAのa2"(にしたい)
activesheet.range("$a:$v").autofilter find:=4,criteria1:=array("○○*"),Operator:=xlFilterValues(これはできてる)

な具合です。ファイルAのa1の部分は2019などと指定すれば動くのですが、この部分は変更したいので
固定しない状態にしたいです。

閲覧数:
21
回答数:
1
お礼:
500枚

違反報告

ベストアンサーに選ばれた回答

c72********さん

2019/3/616:26:57

変数でやってみては。

a1 = Workbooks("ファイルA.xlsm").Sheets("Sheet1").Range("A1")
a2 = Workbooks("ファイルA.xlsm").Sheets("Sheet1").Range("A2")

ActiveSheet.Range("$a:$v").AutoFilter Field:=2, Criteria1:=a1
ActiveSheet.Range("$a:$v").AutoFilter Field:=3, Criteria1:=a2

ただし同時に開いてないといけません。

質問した人からのコメント

2019/3/6 16:36:25

ありがとうございましたm(_ _)m
思った通りになりました❗

みんなで作る知恵袋 悩みや疑問、なんでも気軽にきいちゃおう!

Q&Aをキーワードで検索:

Yahoo! JAPANは、回答に記載された内容の信ぴょう性、正確性を保証しておりません。
お客様自身の責任と判断で、ご利用ください。
本文はここまでです このページの先頭へ

「追加する」ボタンを押してください。

閉じる

※知恵コレクションに追加された質問は選択されたID/ニックネームのMy知恵袋で確認できます。

不適切な投稿でないことを報告しました。

閉じる