- ベストアンサー
オートフィルタの項目設定
オートフィルタにてあるセルに値(又は文字列)を入力すると、それに対応したフィルタをかけられるようにするにはどうしたらよいですか? Criteria1:= Range"A1".Value ではエラーが出ます。 マクロは記録のみでしか作成したことがない初心者ですがよろしくお願いします
- みんなの回答 (2)
- 専門家の回答
関連するQ&A
- excel 2003 オートフィルタ!
excel 2003で、オートフィルタがうまくいきません。 A列の2行目から、1~5までの数字がランダムに並んでいるとします。 A1セルをオートフィルタし、 条件を、オプション>3を含む で指定すると、3がフィルタされてほしいのですが 1つも抽出されません。 3で始まるもだめでした・・ フィルタで抽出するマクロをくんでいて 列は、20列以上あり、 列によって、文字や数値があります。 フォームで列を選び、検索文字を入力して Criteria1:="=*" & 検索文字 & "*", Operator:=xlAnd と言う感じでフィルタしています。 文字はできますが、数値ができないのは、なぜでしょうか・・・
- 締切済み
- その他MS Office製品
- オートフィルタのマクロについて
オートフィルタのマクロを組もうとしているのですが、フィルタ条件に別シートのセルの値を入れたいのですが、そこがどうもうまくいきません。 作成したマクロは以下の通りです。 Sub 累計計算マクロ() Dim aRange As Range, bRange As Range, i As Date Set aRange = Sheets("累計").Range("B1") Set bRange = Sheets("累計").Range("B2") i = aRange.Value Sheets("クイーンエステート").Activate Range("A13:L13").Select Selection.AutoFilter Selection.AutoFilter Field:=2, Criteria1:="<=i", Operator:=xlAnd End Sub どなたか助けてください! 宜しくお願い致します。
- ベストアンサー
- その他MS Office製品
- オートフィルターの使い方
マクロでオートフィルタを使おうと思っているのです。 作成したリストの中で、日付でフィルタしようと思い 下記を作成してみましたがうまくいきません。 Worksheets("シート名").Range("A2").AutoFilter Field:=30, Criteria1:="<=2004/9/30", Operator:=xlAnd = 1, Criterial2:=">=2004/9/1" 条件と致しましては任意の期間(例:2004/9/1~2004/9/30)を抽出条件としたいのですが・・・ 又、セルには空白も存在します。 宜しくお願いいたします。
- ベストアンサー
- Visual Basic
- エクセルのオートフィルターをマクロで記録
エクセルのマクロ記録でオートフィルター機能を記録したのですが フィルターのボタンを押して各項目を選択するのに (すべて) (トップテン) (オプション) (空白セル) (空白以外のセル)があるのですが (空白セル)を選択すると , Criteria1:"=" (空白以外のセル)だと , Criteria1:"<>" のようにマクロ記録されます (すべて)を選択した場合 , Criteria1:が記録されないのですが これをあえて構文として書くと、どのようになるのでしょう 他のマクロで引用したいので困っています よろしくお願いいたします
- ベストアンサー
- オフィス系ソフト
- EXcelオートフィルタのオプション設定で条件として変数をマクロで組むには?
オートフィルタ機能を使い、指定期間内のデータを抽出するようにマクロを組みたい。指定期間が一定ではないので変数を設定したいのですがうまくいきません。下記はマニュアルで入力したものをマクロに記録したものです。指定期間は他のBookのセルに入力画面として設けてあります。例えばBook2/B1(開始)~B2(終了)。 Range("A1").Select Selection.AutoFilter Selection.AutoFilter Field:=1, Criteria1:=">=2005/8/21", Operator:=xlAnd _ , Criteria2:="<=2005/9/20" Range("C1").Select End Sub
- 締切済み
- オフィス系ソフト
- EXCELマクロでワイルドカードを使ったオートフィルタ処理の方法がわからない
エクセルのマクロがうまく動かないので、教えてください。 あるセルにカーソルをおいて、そのセルの文字を含んだ文字で(ワイルドカードを使って)オートフィルタ処理をしたいのですが、 「構文エラー」となってしまいます。 Dim num As String num = ActiveCell.Value Sheets("リスト").Select Columns("AN:AN").Select Selection.AutoFilter Selection.AutoFilter Field:=1, Criteria1:="=*"&num&"*", Operator:=xlAnd ActiveWindow.ScrollColumn = 2 Range("A1").Select Criteria1:="=*"&num&"*"の部分で 「構文エラー」になっているようなのですが… お分かりになる方教えてください。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- オートフィルタ 検索
オートフィルタで三つの条件でデータを抽出するマクロを作っています 以下のような記述は誤りでしょうか? ActiveSheet.Range("$B$2:$D$114").AutoFilter Field:=1, Criteria1:="=02722*" _ , Operator:=xlOr, Criteria2:="=02729*" _ , Operator:=xlOr, Criteria3:="=02737*" 表はこのようなものです ↓キー 番号 名前 値 027** ** * 027** ** * 027** ** * ・ ・ ・
- 締切済み
- オフィス系ソフト
- オートフィルタをかけるマクロ
A12からA50に表示されている内容でB列にオートフィルタをかけ、印刷をする というマクロですが、 Selection.Autofilter field:=2, Criteria1:=Range("A12") Activesheet.Printout を39回コピーし、"A12"の部分を"A13"............"A50"に変えていきました。 本当はもっとスッキリできると思うのですが、そこがまだよくわかりませんので どなたか教えていただけないでしょうか。 A列は必ず50までデータがあるとは限りません。 エクセル2003使用の初心者です。 よろしくお願いします。
- ベストアンサー
- その他MS Office製品
- excel2000のオートフィルタマクロ
マクロ記録の簡単な編集程度の知識しかありません。 C1に入っている文字列を、完全一致ではなく、”含む”状態でオートフィルタしたいのですが、 どの様に記述すればいいですか? 現状、下記のようになっています。 Selection.AutoFilter Field:=2, Criteria1:="C1", Operator:=xlAnd よろしくお願いいたします。
- ベストアンサー
- Excel(エクセル)
- エクセル オートフィルタの抽出条件をデフォルト設定したい
エクセルでQ&Aを作成しています。 A列にQuestion B列にAnswer を入力してだけのシンプルな物です。 それぞれの列にオートフィルタをかけ、任意のキーワードを含むQ&Aだけを抽出できるようにしてあります。 実際の作業手順としては、下記の通りです。 1.オートフィルタの▼ボタンをクリック 2.「オプション」をクリック 3.任意のキーワードを入力 4.キーワードの右側のドロップダウンメニューで「を含む」を選択 5.「OK」ボタンをクリック この手順の「4」の部分をデフォルトで設定しておくようにはできないでしょうか? (オートフィルタオプションウインドウを開くと「を含む」があらかじめ選択された状態になっている) この手順1.2.4までをマクロで記録して、マクロ実行ボタンをクリックすれば、オートフィルタオプションのウインドウが開いて任意のキーワードを入力する仕組みを作りたいと思っています。 しかし、オートフィルタオプションのウインドウを開いた状態のまま、マクロの記録を停止することができず、思い通りになりません。 自動的に記録されたマクロを見てみると 「Selection.AutoFilter Field:=1, Criteria1:="=**", Operator:=xlAnd」となっています。 この文のどこかを書き換えることなどで対応できないでしょうか? または、他によい方法があれば教えてください。 よろしくお願いします。
- 締切済み
- オフィス系ソフト
お礼
分かり辛い文面ですいませんでした 簡略化するために最低限の部分しか記載しなかったので(汗) でも構文間違いだと言うのが分かりました sheets("○○").を設定しなかったために参照できなかったみたいです うまく動きました 内容は○月、○日のデータをオートフィルタで抽出しようとして エラーばかり出て理解できなかったので、力技でIF文にて月フィルタ(12個分)日フィルタ(31個分)を文字列で設定していました でもこれでマクロもすっきりしました。 ありがとうございました。 今後はもっと高度な質問ができるよう頑張ります。