- ベストアンサー
エクセルのオートフィルタを使わないフィルタ方法を伝授してください。
gatt_mkの回答
- gatt_mk
- ベストアンサー率29% (356/1220)
ご質問者の意図とは若干違うかもしれませんが、フィルタオプションとVBAの組み合わせで比較的簡単に作れるかもしれません。 ただし「月」を条件にしたければ、月日から月を作成する関数(MONTH関数など)で月のみを表示する列を作成しておく必要があります。 そのような列を作れば、ブックのイベントプロシージャ(SheetChage)等に、フィルタオプションの機能をVBAスクリプトとして記述することで可能だと思います。 参考までに(表のサイズなどはそちらで任意に読み替えてください) Public Sub Data_filter() Range("A5:S55").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= Range("C1:C2"), Unique:=False End Sub Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If ActiveCell.Column = 3 Then If Cells(2, 3).Value = "" Or IsNull(Cells(2, 3)) Then ActiveSheet.ShowAllData Else Call Data_filter End If End If End Sub
関連するQ&A
- 「エクセル2000」オートフィルタに関しまして
例えば・・・ ・A列に色々な数字が入力されているとします。 ・B列に色々な方のお名前が入力されているとします。 (B列のお名前は重複しているとします。) これにオートフィルタを設定します。 ここからがご質問なのですが・・・ 重複している名前をオートフィルタで 選び出します。そのときに、A列の数字合計を 表示させることは可能でしょうか? A列全体の数字合計ではなく、選び出した方のみの 合計を出す方法があれば、教えて頂きたいと思います。 分かりにくい質問で、大変申し訳ございませんが もしご存知の方がいらっしゃれば、お願い致します。
- ベストアンサー
- オフィス系ソフト
- エクセルVBAで、期間内にある指定した数字を自動入力
下のように月日(A列)のみが書いてある表があります。 ここに定価を自動入力させたいと考えています。 ただ条件が複雑で・・・。 期間内にあるもので、曜日により値を振り分けする必要があります。 例えば、 ■月日(from) 3/1 ■月日(to) 3/3 ■値 土・日・・・500 月・・・・・450 このような条件で、下の[入力前]の表の「値」の列に [入力前] 月日 曜日 値 3/1 (土) 3/2 (日) 3/3 (月) 3/4 (火) 3/5 (水) 3/6 (木) 下のようにそれぞれ入力させたいのです。 [入力後] 月日 曜日 値 3/1 (土) 500 3/2 (日) 500 3/3 (月) 450 3/4 (火) 3/5 (水) 3/6 (木) どこかのスペースに ■月日(from) 3/1 ■月日(to) 3/3 ■値 土・日・・・500 月・・・・・450 このような条件入力をするところを設けて、マクロを実行すると入力するようにしたいのですが、こんな複雑な振り分け設定ってVBAでもできるでしょうか?
- ベストアンサー
- オフィス系ソフト
- EXCELのオートフィルタ解除について教えてください
エクセルで表を作り、オートフィルタを使っています。 A:西暦 B:月日(9月10日とか12月31日などと入力) C:会社名 D:訪問内容 いずれも文字列入力です。 月日別に分けようと思い、Bでオートフィルタを使用。 昇順で並び替えをしてみました。 すると、月日を4桁で入力していないので10月が頭に 出てきてしまいました。 それだと意味がないので戻そうとしたところ、 それができません。 表示を「すべて」にしてもフィルタを解除しても、 10月がずっと冒頭にきています。。。 元に戻そうと思っても、編集のタブには 「元に戻せません」の文字が・・・ 昇順、降順で並び替えてしまったあとには、 最初の順に戻すことはできないのでしょうか? 知ってる方がいたら教えてください。
- ベストアンサー
- Windows XP
- エクセルで、増減の無い日の残を表示したくない
会社のオフィス2000でのエクセルなのですが・・・ ある、在庫管理表がエクセルで有ります。 一般的な表なのですが、A列が【月日】B列【受入】C列【払出】D列【残】と言う感じで、D列の数式が【前日残+当日受-当日払】みたいに簡単な数式になってます。 商品種目が10種くらい、並んで1つの表になっています。 この場合に、増減の無い商品、未来日にも残数表示されます。 (例:a商品の、7月1日持越10、7月5日受+5、10日払-6の場合、 7月2日~4日の各残10、6日~9日の各残15、7月11日~31日まで各残8・・・) 増減の無い日(=B列とC列に入力の無いD列)は、 残数D列を表示させないにはどうしたら良いでしょう? 質問内容わかるでしょうか?
- ベストアンサー
- オフィス系ソフト
- エクセルについて(日付、曜日の入力)
A1、A7、A13・・・・と、ずっと6個おきの場所に日付を4月1日、4月4日、4月7日・・・と3日におきに入力。 また、A3、A9、A15・・・と、ずっと6個おきの場所に、入力した月日の曜日を入力したいのですが、可能でしょうか。 例えば、A1に4月1日、A3に火曜日、A7に4月4日、A9に金曜日というように。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセル オートフィルを使った日付について
こんにちは。 今、月ごとの勤務表を作成しています。 シート1枚につき1月分、合計12シートあります。 表の行数は各月すべて31日分(31行)作成してあります。 A列に「2005/1/1」と入力し、オートフィルで月末まで入力しているます。 31日ある月は表の最後の行までオートフィルを使っても問題ないのですが、29日とか30日の月は翌月の1日まで入力されてしまいます。(下記参照) (シート1) (シート2) 2005/1/1 2005/2/1 ・ ・ ・ ・ ・ ・ ・ 2005/2/28 ・ 2005/3/1 ・ 2005/3/2 2005/1/31 2005/3/3 オートフィルを使ってコピーした場合に、月末から先の日付を表示させないようにする関数はありませんでしょうか? よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- エクセルのオートフィルタで合計を出したい
エクセルでA列に会社名、B列に支払い金額が、100行にわたって入力されているとします。 オートフィルタをかけて、ある会社(△△商事)だけ選択したら10件だったとします。この△△商事の支払い金額の合計はどのように出すのでしょうか? 金額が10件ピックアップされて、次のセルでSUMで合計しても100件分の合計になってしまいます。 この△△商事の10件だけの合計金額の出し方を教えてください。
- ベストアンサー
- オフィス系ソフト
- Excelのオートフィルタでデータ抽出するマクロについて
オートフィルタで指定した期間のデータ抽出のマクロを作成しているのですが上手くいきません。 例えばA列に 10月29日 11月1日 11月3日 11月5日 と日付を入力しており、B列、C列にデータを入力していたとして D列1行目に10月31日、D列2行目に11月4日と入力し D列1行目からD列2行目までと指定したデータを抽出するマクロを教えていただけませんか。 マクロ初心者で、困っております。どうかよろしく御願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルでの予定表作成
過去の質問から色々試したのですがうまくいかなくて? A1に開始日を手入力。(2003/9/1) 表示は平成15年09月01日にしてます。 A2列からAE2列までを1から30まで自動表示。 A3列からAE3列までを曜日を自動表示。 土・日の列は色を自動表示。 上記のように自動表示したいのですが宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- オートフィルターの抽出されない条件とは
シートに8列の項目があり項目に対応する文字列を入力しているブックがあります。A列に識別コード(主キーみたいな感覚で)作成してこれまでは Sheet1.Range("A1").AutoFilter Field:=1, Criteria1:= _ "=*08??", Operator:=xlAnd として抽出したい文字列だけ抽出できていました。 今回、別の識別コード(具体的には月日です)をA列に新たに挿入して同じように抽出を試みましたが、何も抽出されず文字列が入力されている最終行の次の1行以前が消えてしまいます(空欄が抽出された)。しかし、完全一致であれば抽出できます。なぜでしょうか? ちなみに新しい識別は月日なので4桁の数字で10月10日→1010というようにしています。これで10月の行を抽出したいので"=10??"で抽出をかけてみたりしているのですが・・・。
- ベストアンサー
- オフィス系ソフト