No.2ベストアンサー
- 回答日時:
(1)Criteria3:="3"はエラーになります。
Criteria2:="1"までにすると上手く行きます。
「1つのフィールドでは」、Criteria2までしか使えないでうね。(EXL2000)
#1回答のとおりですが、2つ目が「Field:=b,」と別列になっているのは大丈夫でしょうか。またAutoFilterを2個重ねると後のほうが、優先と言うか結果となりましたが。
(上手く行かない例)
Sub Macro2()
Range("A1:C6").Select
AutoFilterMode = False
Selection.AutoFilter Field:=1, Criteria1:="2", _
Operator:=xlOr, Criteria2:="1", Operator:=xlOr, _
Criteria3:="3"
End Sub
(2)Criteria1:="<>1*"のようなものが、オプションの「で始まらない」のマクロの記録で出るので使えると思いやって見ました。
Selection.AutoFilter Field:=2, Criteria1:="<>a*", Operator:=xlAndで「aで始まらないもの」が選択されました。
ありがとうございます!!!
aaa
bbb
ccc
ddd
eee
fff
ggg
のような場合、「ggg以外」にしたかったのですが、xlorしかしらなくて、「xlオア」だった事、andなど全て使えると言うことを知りませんでした。
おかげさまでやりたい事が出来ました。
そして、今後の仕事の幅や速度が大幅アップです^^。
それに、仕事中に速い回答頂けたので、ものすごくはかどりました。
あれですね、okwebというシステム、皆さんの知識の集合とはものすごい価値のあるものですね。
本当にありがとうございました。
No.3
- 回答日時:
こんにちは。
私の手元ではテストしてうまく動作したのですが、貴方様の思い通りの動作をするサンプルマクロを組んでみたいと思います。貴方様のおやりになりたいことを具体的に詳しく教えて下さい。また、次のことも教えて下さい。・第1条件・第2条件・第3条件・第4条件
・第1・第2条件を抽出する際のフィールド番号
・第3・第4条件を抽出する際のフィールド番号
お手数をおかけいたしますが、よろしくお願いいたします。
ありがとうございますっ。
今回は解決してしまいましたが、そういった甘えた質問方法でしても、細かいところまで行き届くお力を貸してくださる方がいらっしゃる事がわかって感動しました。
まだまだ覚えたてで勉強不足なので、またokwebを利用する事と思います。
ご縁があればまたお力を貸してください。
よろしくお願いします。
ありがとうございました。
No.1
- 回答日時:
初めまして。
抽出条件は、Criteria2までしか指定することができません。3個以上の抽出をかける時には次のように操作します。抽出条件が4種類あったとき
Object.Autofilter
Selection.Autogfilter Field:=a, Criteria1:=第3条件,Criteria2:=第4条件
Selection.AutoFIlter Field:=b, Criteria1:=第1条件,Criteria2:=第2条件
お試しになってみて下さい。
この回答への補足
ここに書くのもどうかと思ったのですが、
非常に素早いレス心強くて本当にありがとうございました。
どの本でも「Criteria2までしか指定することができません」とは言い切ってはいなかったので、
早い段階で試行錯誤せずに諦めがついたのも助かりました。
私の質問の仕方が悪かったのが原因なのに、大変申し訳ありませんが、今回は、
直接やりたい事に結びついたり、それがなかったら解決への近道になったであろう、上のお2人にポイント発行させていただきます。
すいません。でも本当に感謝しております。
ありがとうございました。
ありがとうございます。
同じ列(Field)で3個以上の抽出をかけたい時、頂いたのを例に、
Selection.Autogfilter Field:=a, Criteria1:=第3条件,Criteria2:=第4条件
Selection.AutoFIlter Field:=b, Criteria1:=第1条件,Criteria2:=第2条件
上記でAもBも1だった場合でも、
第1条件・第2条件だけにならずに1234全て表示されるのでしょうか?
あああ
いいい
ううう
えええ
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルで2つの表を比較して、文字列が同じだが、その行のある値が違うものを抽出したい 1 2022/10/06 21:48
- Excel(エクセル) エクセルの関数を教えてください。② 9 2023/05/25 15:28
- その他(データベース) Accessのクエリで1フィールドの抽出条件設定をNullでなく全角半角含む空白のみの文字列でない文 1 2023/04/24 15:20
- Excel(エクセル) エクセルで#以降の文字を取得したい 1 2022/03/28 13:14
- Excel(エクセル) エクセルのデータの抽出について 3 2022/09/15 23:56
- Excel(エクセル) 【マクロ】マクロが保存されているエクセルとは、別のエクセルのオートフィルターのしぼりをクリアーしたい 2 2022/12/24 08:36
- Excel(エクセル) ExcelVBAについて。 2 2022/12/10 20:08
- Excel(エクセル) エクセルの表でダブりを解消する方法を、教えてください。 5 2023/04/12 12:11
- Excel(エクセル) Excel(エクセル)でフィルター抽出後、非表示の行を計算しないで、合計を算出する方法 【内容】 添 4 2023/01/30 17:17
- Visual Basic(VBA) Sheet3から2つの条件でオートフィルターで抽出した個数をSheet2へ入力するマクロで、一つ目の 4 2023/01/12 23:40
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ACCESSのクエリで抽出条件「ま...
-
ACCESS 「パラメータの入力」...
-
ACCESSの時間帯の抽出について
-
Accessクエリーでチェックボッ...
-
アクセスでの抽出方法(日付+時...
-
PCゲームから音声ファイルを抽...
-
accessの日付フィールドから前...
-
Access 日付抽出について
-
Access テーブルを分割してエク...
-
Access 2003 iif [日付フィール...
-
accessのレポートで封筒に住所...
-
ACCESS クエリの抽出条件に他の...
-
最大値以外の抽出方法
-
ACCESSのクエリで集計
-
ACCESS クエリの抽出条件を動的...
-
エクセル2010の統計作業(フィ...
-
Accessで任意のテーブルのフィ...
-
access クエリの抽出条件を入れ...
-
ExcelのVBAで、XMLファイルのデ...
-
クエリの進行状況を知りたい。
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ACCESS 「パラメータの入力」...
-
ACCESSのクエリで抽出条件「ま...
-
ACCESS クエリの抽出条件に他の...
-
ACCESSの時間帯の抽出について
-
Access テーブルを分割してエク...
-
PCゲームから音声ファイルを抽...
-
アクセス・クエリの抽出条件(...
-
エクセルのマクロで検索・抽出...
-
access クエリの抽出条件を入れ...
-
ACCESS クエリの抽出条件を動的...
-
accessの日付フィールドから前...
-
アクセスでの抽出方法(日付+時...
-
Access 2003 iif [日付フィール...
-
ACCESS クエリで”1”でないもの...
-
元データから連続5日以上だった...
-
アクセス2000で、DBの0と空白以...
-
ACCESS抽出条件でデータ型が一...
-
最大値以外の抽出方法
-
クエリの進行状況を知りたい。
-
Accessクエリーでチェックボッ...
おすすめ情報