エクセルの学校：全文検索：Hyper Estraier：オートフィルタ

Results of 1 - 1 of about 4266 for オートフィルタ (0.004 sec.)

[[20100416163219]]: #score: 4241; @digest: 09e66c00674d786bd6b27ec32f77f8f4; @id: 48931; @mdate: 2010-04-20T07:12:10Z; @size: 2613; @type: text/plain; #keywords: 品*" (32951), 返品 (28548), 果; (7005), 「返 (4532), criteria1 (3847), 品」 (3156), ズバ (3021), operator (2496), xland (2437), autofilter (1895), バリ (1580), ルタ (1244), トフ (1158), フィ (1042), 索方 (1027), ィル (991), オー (989), field (985), activecell (609), 含む (590), がフ (580), selection (572), でa1 (547), select (488), ロ記 (434), 今度 (397), マク (382), る値 (349), activesheet (344), クロ (343), range (337), 手作 (322); 『マクロとオートフィルタの組み合わせ』（ふぴふぴ）
Excel2007を使用しています。マクロを組みたいのですが、現在、5行目にオートフィルタをつけています。例えば、C列に「返品」と入っているものを抽出したいのですが、この時、作業は、 @C1のセルに「返品」と入力する Aマクロボタンをクリックする ⇒結果;C列でオートフィルタの「返品」を含む、ものが抽出されるという事をしたいです。うまく説明が出来ませんが、C1のセルに入力してある文字列を、オートフィルタで「含む」という形で検索したいのです。マクロが分からないのですが、どのように書けばいいかズバリ教えて頂けないでしょうか? どうぞよろしくお願いします。 ---- 手作業で同じ事をやるのをマクロ記録を取ればそのまま使えると思いますので試してみてください。ほとんどズバリのコードと変わらないと思いますので。（momo） ---- 今、普通にオートフィルタで絞り込のマクロを作るとこのようになっています Rows("5:5").Select Selection.AutoFilter Selection.AutoFilter Range("C4").Select Selection.AutoFilter Field:=3, Criteria1:="=*返品*", Operator:=xlAnd 今度は予めA1のセルに、返品と入力しておいて、それをオートフィルタの検索の時に「含む」を選んでA1のセルをコピーして貼りつけて、実行すると「返品」絞りこまれるのですが、A1のセルに他の文字を入力するとまた返品が絞り込まれてしまいます。（以下参照下さい）私のやり方が全くなってないのだとは思うのですが、どうやったらいいのか分からないのです。。。 Range("A1").Select ActiveCell.FormulaR1C1 = "返品" ActiveCell.Characters(1, 2).PhoneticCharacters = "ヘンピン" Range("C325").Select ActiveSheet.Range("$A$5:$Y$339").AutoFilter Field:=3, Criteria1:="=*返品*", _ Operator:=xlAnd Range("A1").Select End Sub 教えてください。 ---- 単純にA1セルの値でフィルターを掛けたいという事ですか? だとすると > ActiveSheet.Range("$A$5:$Y$339").AutoFilter Field:=3, Criteria1:="=*返品*", _ Operator:=xlAnd この行の Criteria1:="=*返品*" この部分がフィルタを掛ける値ですので、そこにA1セルの値という事で Criteria1:=Range("A1").Value のように変更してみてください。（momo） ---- 出来ました!出来ました! ありがとうございます。本当にありがとうございました。とても嬉しいです。 ---- Criteria1:="=*返品*" この部分がフィルタを掛ける値で A1セルには「返品」だけが入っているので Criteria1:="=*" & Range("A1").Value & "*" もしくは Criteria1:="*" & Range("A1").Value & "*" では? (HANA) ---- 遅くなりましたが、「含む」形での検索方法、ありがとうございます!! 実は、A1へ「*返品*」と入力して使用しました。これで、入力時に「*」を入れなくてすみました!! 大変、便利になりました。ありがとうございます!! ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/201004/20100416163219.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ